home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Tools / MPW / flex 2.4.6 / initscan.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-01-29  |  76.0 KB  |  2,722 lines  |  [TEXT/MPS ]
  1. /* A lexical scanner generated by flex */
  2.  
  3. /* Scanner skeleton version:
  4.  * $Header: flex.skl,v 1.2 94/01/04 14:33:15 vern Exp $
  5.  */
  6.  
  7. #define FLEX_SCANNER
  8.  
  9. #include <stdio.h>
  10.  
  11. #ifdef macintosh
  12. #ifndef fileno
  13. #define fileno(p)    (p)->_file
  14. #endif
  15. #include <ioctl.h>
  16. #define isatty(fd)    (ioctl(fd, FIOINTERACTIVE, NULL) == 0)
  17. #endif
  18.  
  19.  
  20. /* cfront 1.2 defines "c_plusplus" instead of "__cplusplus" */
  21. #ifdef c_plusplus
  22. #ifndef __cplusplus
  23. #define __cplusplus
  24. #endif
  25. #endif
  26.  
  27.  
  28. #ifdef __cplusplus
  29.  
  30. #include <stdlib.h>
  31. #include <unistd.h>
  32.  
  33. /* Use prototypes in function declarations. */
  34. #define YY_USE_PROTOS
  35.  
  36. /* The "const" storage-class-modifier is valid. */
  37. #define YY_USE_CONST
  38.  
  39. #else    /* ! __cplusplus */
  40.  
  41. #if defined(__STDC__) || defined(macintosh) || defined(THINK_C)
  42.  
  43. #define YY_USE_PROTOS
  44. #define YY_USE_CONST
  45.  
  46. #endif    /* __STDC__ */
  47. #endif    /* ! __cplusplus */
  48.  
  49.  
  50. #ifdef __TURBOC__
  51. #define YY_USE_CONST
  52. #endif
  53.  
  54.  
  55. #ifndef YY_USE_CONST
  56. #ifndef const
  57. #define const
  58. #endif
  59. #endif
  60.  
  61.  
  62. #ifdef YY_USE_PROTOS
  63. #define YY_PROTO(proto) proto
  64. #else
  65. #define YY_PROTO(proto) ()
  66. #endif
  67.  
  68. /* Returned upon end-of-file. */
  69. #define YY_NULL 0
  70.  
  71. /* Promotes a possibly negative, possibly signed char to an unsigned
  72.  * integer for use as an array index.  If the signed char is negative,
  73.  * we want to instead treat it as an 8-bit unsigned char, hence the
  74.  * double cast.
  75.  */
  76. #define YY_SC_TO_UI(c) ((unsigned int) (unsigned char) c)
  77.  
  78. /* Enter a start condition.  This macro really ought to take a parameter,
  79.  * but we do it the disgusting crufty way forced on us by the ()-less
  80.  * definition of BEGIN.
  81.  */
  82. #define BEGIN yy_start = 1 + 2 *
  83.  
  84. /* Translate the current start state into a value that can be later handed
  85.  * to BEGIN to return to the state.
  86.  */
  87. #define YY_START ((yy_start - 1) / 2)
  88.  
  89. /* Action number for EOF rule of a given start state. */
  90. #define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1)
  91.  
  92. /* Special action meaning "start processing a new file".  Now included
  93.  * only for backward compatibility with previous versions of flex.
  94.  */
  95. #define YY_NEW_FILE yyrestart( yyin )
  96.  
  97. #define YY_END_OF_BUFFER_CHAR 0
  98.  
  99. /* Size of default input buffer. */
  100. #define YY_BUF_SIZE 16384
  101.  
  102. typedef struct yy_buffer_state *YY_BUFFER_STATE;
  103.  
  104. extern int yyleng;
  105. extern FILE *yyin, *yyout;
  106.  
  107. #ifdef __cplusplus
  108. extern "C" {
  109. #endif
  110.     extern int yywrap YY_PROTO(( void ));
  111. #ifdef __cplusplus
  112.     }
  113. #endif
  114.  
  115. #define EOB_ACT_CONTINUE_SCAN 0
  116. #define EOB_ACT_END_OF_FILE 1
  117. #define EOB_ACT_LAST_MATCH 2
  118.  
  119. /* The funky do-while in the following #define is used to turn the definition
  120.  * int a single C statement (which needs a semi-colon terminator).  This
  121.  * avoids problems with code like:
  122.  *
  123.  *     if ( condition_holds )
  124.  *        yyless( 5 );
  125.  *    else
  126.  *        do_something_else();
  127.  *
  128.  * Prior to using the do-while the compiler would get upset at the
  129.  * "else" because it interpreted the "if" statement as being all
  130.  * done when it reached the ';' after the yyless() call.
  131.  */
  132.  
  133. /* Return all but the first 'n' matched characters back to the input stream. */
  134.  
  135. #define yyless(n) \
  136.     do \
  137.         { \
  138.         /* Undo effects of setting up yytext. */ \
  139.         *yy_cp = yy_hold_char; \
  140.         yy_c_buf_p = yy_cp = yy_bp + n - YY_MORE_ADJ; \
  141.         YY_DO_BEFORE_ACTION; /* set up yytext again */ \
  142.         } \
  143.     while ( 0 )
  144.  
  145. #define unput(c) yyunput( c, yytext_ptr )
  146.  
  147.  
  148. struct yy_buffer_state
  149.     {
  150.     FILE *yy_input_file;
  151.  
  152.     char *yy_ch_buf;        /* input buffer */
  153.     char *yy_buf_pos;        /* current position in input buffer */
  154.  
  155.     /* Size of input buffer in bytes, not including room for EOB
  156.      * characters.
  157.      */
  158.     int yy_buf_size;
  159.  
  160.     /* Number of characters read into yy_ch_buf, not including EOB
  161.      * characters.
  162.      */
  163.     int yy_n_chars;
  164.  
  165.     /* Whether this is an "interactive" input source; if so, and
  166.      * if we're using stdio for input, then we want to use getc()
  167.      * instead of fread(), to make sure we stop fetching input after
  168.      * each newline.
  169.      */
  170.     int yy_is_interactive;
  171.  
  172.     /* Whether to try to fill the input buffer when we reach the
  173.      * end of it.
  174.      */
  175.     int yy_fill_buffer;
  176.  
  177.     /* Whether we've seen an EOF on this buffer. */
  178.     int yy_eof_status;
  179. #define EOF_NOT_SEEN 0
  180.     /* "Pending" happens when the EOF has been seen but there's still
  181.      * some text to process.  Note that when we actually see the EOF,
  182.      * we switch the status back to "not seen" (via yyrestart()), so
  183.      * that the user can continue scanning by just pointing yyin at
  184.      * a new input file.
  185.      */
  186. #define EOF_PENDING 1
  187.     };
  188.  
  189. static YY_BUFFER_STATE yy_current_buffer = 0;
  190.  
  191. /* We provide macros for accessing buffer states in case in the
  192.  * future we want to put the buffer states in a more general
  193.  * "scanner state".
  194.  */
  195. #define YY_CURRENT_BUFFER yy_current_buffer
  196.  
  197.  
  198. /* yy_hold_char holds the character lost when yytext is formed. */
  199. static char yy_hold_char;
  200.  
  201. static int yy_n_chars;        /* number of characters read into yy_ch_buf */
  202.  
  203.  
  204. int yyleng;
  205.  
  206. /* Points to current character in buffer. */
  207. static char *yy_c_buf_p = (char *) 0;
  208. static int yy_init = 1;        /* whether we need to initialize */
  209. static int yy_start = 0;    /* start state number */
  210.  
  211. /* Flag which is used to allow yywrap()'s to do buffer switches
  212.  * instead of setting up a fresh yyin.  A bit of a hack ...
  213.  */
  214. static int yy_did_buffer_switch_on_eof;
  215.  
  216. static void yyunput YY_PROTO(( int c, char *buf_ptr ));
  217. void yyrestart YY_PROTO(( FILE *input_file ));
  218. void yy_switch_to_buffer YY_PROTO(( YY_BUFFER_STATE new_buffer ));
  219. void yy_load_buffer_state YY_PROTO(( void ));
  220. YY_BUFFER_STATE yy_create_buffer YY_PROTO(( FILE *file, int size ));
  221. void yy_delete_buffer YY_PROTO(( YY_BUFFER_STATE b ));
  222. void yy_init_buffer YY_PROTO(( YY_BUFFER_STATE b, FILE *file ));
  223.  
  224. static int yy_start_stack_ptr = 0;
  225. static int yy_start_stack_depth = 0;
  226. static int *yy_start_stack = 0;
  227. static void yy_push_state YY_PROTO(( int new_state ));
  228. static void yy_pop_state YY_PROTO(( void ));
  229. static int yy_top_state YY_PROTO(( void ));
  230.  
  231. #ifndef yytext_ptr
  232. static void yy_flex_strcpy YY_PROTO(( char *, const char * ));
  233. #endif
  234.  
  235. static void *yy_flex_alloc YY_PROTO(( unsigned int ));
  236. static void *yy_flex_realloc YY_PROTO(( void *ptr, unsigned int ));
  237. static void yy_flex_free YY_PROTO(( void * ));
  238.  
  239. #define yy_new_buffer yy_create_buffer
  240.  
  241. #define INITIAL 0
  242. #define SECT2 1
  243. #define SECT2PROLOG 2
  244. #define SECT3 3
  245. #define CODEBLOCK 4
  246. #define PICKUPDEF 5
  247. #define SC 6
  248. #define CARETISBOL 7
  249. #define NUM 8
  250. #define QUOTE 9
  251. #define FIRSTCCL 10
  252. #define CCL 11
  253. #define ACTION 12
  254. #define RECOVER 13
  255. #define BRACEERROR 14
  256. #define C_COMMENT 15
  257. #define ACTION_COMMENT 16
  258. #define ACTION_STRING 17
  259. #define PERCENT_BRACE_ACTION 18
  260. #define USED_LIST 19
  261. #define CODEBLOCK_2 20
  262. typedef unsigned char YY_CHAR;
  263. typedef int yy_state_type;
  264. FILE *yyin = (FILE *) 0, *yyout = (FILE *) 0;
  265. extern char *yytext;
  266. #define yytext_ptr yytext
  267.  
  268. #ifdef __cplusplus
  269. static int yyinput YY_PROTO(( void ));
  270. #else
  271. static int input YY_PROTO(( void ));
  272. #endif
  273.  
  274. static yy_state_type yy_get_previous_state YY_PROTO(( void ));
  275. static yy_state_type yy_try_NUL_trans YY_PROTO(( yy_state_type current_state ));
  276. static int yy_get_next_buffer YY_PROTO(( void ));
  277. static void yy_fatal_error YY_PROTO(( const char msg[] ));
  278.  
  279. /* Done after the current pattern has been matched and before the
  280.  * corresponding action - sets up yytext.
  281.  */
  282. #define YY_DO_BEFORE_ACTION \
  283.     yytext_ptr = yy_bp; \
  284.     yyleng = yy_cp - yy_bp; \
  285.     yy_hold_char = *yy_cp; \
  286.     *yy_cp = '\0'; \
  287.     yy_c_buf_p = yy_cp;
  288.  
  289. #define YY_END_OF_BUFFER 113
  290. static const short int yy_accept[408] =
  291.     {   0,
  292.         0,    0,    0,    0,   41,   41,  110,  110,    0,    0,
  293.         0,    0,    0,    0,    0,    0,    0,    0,    0,    0,
  294.         0,    0,    0,    0,    0,    0,    0,    0,    0,    0,
  295.         0,    0,    0,    0,    0,    0,    0,    0,    0,    0,
  296.         0,    0,  113,  111,    6,  111,   17,   15,    1,  111,
  297.        16,  111,  111,   14,   60,   53,   60,   54,   47,   60,
  298.        59,   60,   60,   60,   60,   44,   60,   43,   60,   45,
  299.        46,   41,   41,   42,   40,   39,   40,   40,  110,  110,
  300.        26,   26,   27,   26,   26,   26,   26,   26,   29,   28,
  301.        29,   30,   65,   61,   62,   64,   66,   80,   80,   81,
  302.  
  303.        78,   77,   79,   67,   67,   69,   68,   67,   72,   72,
  304.        72,   74,   74,   76,   74,   74,   75,   92,   92,   97,
  305.        96,   98,   98,   93,   93,   93,   90,   91,  111,  111,
  306.        31,  111,   83,   82,   20,   20,   22,   21,  101,  101,
  307.       102,  100,  103,  103,  105,  106,  107,   88,   88,   88,
  308.        89,   88,   88,   88,   88,   88,   36,   33,   36,   32,
  309.        36,   36,   88,    6,    0,   17,   17,   15,    1,    0,
  310.        16,   16,   13,    7,    0,    0,    0,    3,    0,    4,
  311.         0,    2,   14,   53,    0,   54,    0,    0,   54,   50,
  312.         0,   50,    0,   57,    0,  108,  108,  108,   49,   48,
  313.  
  314.        49,   44,    0,   43,   43,   56,   44,   41,   42,   40,
  315.        39,   39,   37,   38,  110,  110,   26,   27,   26,   26,
  316.        26,   26,   29,   28,   30,   63,   64,   81,   77,   69,
  317.       109,  109,  109,   70,   71,   76,   73,   92,   97,    0,
  318.        95,    0,   94,   93,   93,   93,    0,    0,   31,   31,
  319.        31,   83,   20,   22,   18,  101,  101,  102,  102,  102,
  320.        99,  103,  105,  104,   88,   88,   88,   89,   85,   88,
  321.        88,   88,   36,   33,   32,   36,   36,   84,   13,    7,
  322.         0,    0,   12,    0,    0,    0,    3,    0,    0,    4,
  323.         0,    0,    5,   51,    0,    0,   52,    0,   57,    0,
  324.  
  325.        57,   57,  108,  108,   49,   49,   58,   56,   37,   38,
  326.        26,   26,   26,   26,   23,    0,  109,  109,   93,   93,
  327.         0,    0,   19,   85,   85,   88,   88,   36,   36,   12,
  328.         0,    0,    0,    3,    0,    0,    4,    5,    5,   52,
  329.        52,    0,   57,   57,   57,   57,  108,   26,   26,   23,
  330.        23,    0,  109,   93,   93,   19,   19,   88,   88,   36,
  331.        36,    0,    0,    0,   10,    0,   57,   57,   57,   57,
  332.        26,   26,   93,   93,   88,   88,   36,   36,    0,    0,
  333.         0,    0,   57,   57,   24,   25,   86,   87,   86,   87,
  334.        34,   35,    0,    0,    9,    0,   11,   55,    9,    9,
  335.  
  336.         0,    0,    0,    8,    8,    8,    0
  337.     } ;
  338.  
  339. static const int yy_ec[256] =
  340.     {   0,
  341.         1,    1,    1,    1,    1,    1,    1,    1,    2,    3,
  342.         1,    1,    4,    1,    1,    1,    1,    1,    1,    1,
  343.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  344.         1,    2,    1,    5,    1,    6,    7,    1,    8,    9,
  345.         9,   10,    9,   11,   12,    9,   13,   14,   14,   14,
  346.        14,   14,   14,   14,   14,   14,   14,    1,    1,   15,
  347.         1,   16,    9,    1,   22,   23,   24,   25,   26,   27,
  348.        21,   21,   28,   29,   30,   21,   31,   32,   33,   34,
  349.        21,   35,   36,   37,   38,   21,   21,   39,   40,   21,
  350.        17,   18,   19,   20,   21,    1,   22,   23,   24,   25,
  351.  
  352.        26,   27,   21,   21,   28,   29,   30,   21,   31,   32,
  353.        33,   34,   21,   35,   36,   37,   38,   21,   21,   39,
  354.        40,   21,   41,   42,   43,    1,    1,    1,    1,    1,
  355.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  356.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  357.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  358.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  359.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  360.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  361.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  362.  
  363.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  364.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  365.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  366.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  367.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  368.         1,    1,    1,    1,    1
  369.     } ;
  370.  
  371. static const int yy_meta[44] =
  372.     {   0,
  373.         1,    2,    1,    3,    4,    1,    1,    5,    1,    6,
  374.         1,    7,    5,    8,    1,    1,    1,    9,   10,    1,
  375.        11,   12,   12,   12,   12,   12,   12,   11,   11,   11,
  376.        11,   11,   11,   11,   11,   11,   13,   11,   11,   11,
  377.         5,    1,   14
  378.     } ;
  379.  
  380. static const short int yy_base[470] =
  381.     {   0,
  382.         0,   43,   85,  126,   89,  102, 1610, 1609,  168, 1605,
  383.       108,  111,  211,    0, 1591, 1590,  252,  254,  116,  119,
  384.       134,  138,  145,  147,  297,    0,   93,  104,  338,  340,
  385.       257,  266,  268,  270,  278,  342,  383,    0,  425,  428,
  386.      1596, 1595, 1607, 1615,  114, 1602, 1602,    0,  158, 1600,
  387.      1600,  462, 1592,    0, 1615,  431, 1597, 1597, 1615,  282,
  388.      1615, 1584, 1580,  248,  503,  437, 1593, 1593,  252, 1580,
  389.      1615,    0, 1590, 1590,    0, 1590, 1587,   58, 1586, 1615,
  390.         0, 1585, 1585, 1615,    0, 1561, 1546, 1511,    0, 1551,
  391.      1543, 1543, 1615, 1615, 1498,    0, 1615, 1615, 1500, 1487,
  392.  
  393.      1615, 1463, 1615, 1615, 1466, 1460, 1615,  250, 1615,  334,
  394.       128, 1615, 1411, 1398,    0,  335, 1615,    0, 1383, 1383,
  395.      1615,  137, 1371,    0, 1354, 1336, 1615, 1615,  287,  347,
  396.      1372, 1370, 1366, 1615,    0, 1362, 1349, 1331,  349,  351,
  397.      1336, 1325,    0, 1323, 1310, 1615,    0,    0,  354, 1306,
  398.      1287, 1246, 1615,    0, 1249, 1227,    0, 1264, 1261, 1255,
  399.      1225, 1197, 1213,  355, 1213, 1213, 1615,    0,  360, 1198,
  400.      1193, 1615,    0,    0,  443,  363,  447,    0,  243,    0,
  401.       365, 1615,    0,  451, 1191, 1188, 1149,  367, 1615, 1615,
  402.      1185, 1181, 1155, 1135,  423, 1615, 1125,    0,    0, 1615,
  403.  
  404.       546,  588, 1121, 1108, 1615,    0, 1615,    0, 1615,    0,
  405.         0, 1095,    0,    0, 1087, 1615,    0, 1615,    0, 1061,
  406.      1041,  630,    0, 1069, 1615, 1615,    0, 1615,  838, 1615,
  407.      1615,  837,    0, 1615, 1615, 1615, 1615,    0, 1615,  364,
  408.      1615,    0, 1615,    0,  821,  817,  372,  375,  844,  843,
  409.      1615, 1615,    0, 1615,  439,  463,  467,  835,  834, 1615,
  410.      1615,    0, 1615, 1615,    0,  457,  793, 1615,  673,    0,
  411.       805,  802,    0,  830, 1615,  795,  792, 1615,    0,    0,
  412.       473,  818,  817,  594,  784,  790,    0,  775,  786,    0,
  413.       478,  486,  808, 1615,  590,  596,  807,  776,  790,  587,
  414.  
  415.       274,  703,  793,    0,    0,    0, 1615,    0,    0,    0,
  416.       780,  772,    0,  800,  800,  730,  788,    0,  775,  767,
  417.       599,  601,  796,    0,  773,  772,  764,  770,  762, 1615,
  418.       607,  772,  751,    0,  741,  745,    0,  766, 1615,  765,
  419.      1615,  740,  434,  803,  598,  817, 1615,  742,  730,  761,
  420.      1615,  759, 1615,  738,  726,  757, 1615,  735,  723,  733,
  421.       721,  714,  716,  726, 1615,  724,  599,  831,  716,  659,
  422.       592,  581,  513,  481,  465,  473,  454,  459,  611,  457,
  423.       449,  456,  438,  418,    0,    0,    0,    0,    0,    0,
  424.         0,    0,  615,  617,  377,  259, 1615, 1615,  274, 1615,
  425.  
  426.       619,  621,  624,  150,  122, 1615, 1615,  858,  872,  886,
  427.       900,  914,  928,  942,  956,  970,  984,  998, 1012, 1026,
  428.      1040, 1054, 1062, 1075, 1081, 1094, 1108, 1122, 1136, 1150,
  429.      1164, 1178, 1186, 1199, 1207, 1220, 1234, 1248, 1262, 1272,
  430.      1280, 1293, 1307, 1321, 1335, 1349, 1363, 1371, 1384, 1398,
  431.      1412, 1416, 1419, 1432, 1446, 1460,  710, 1474, 1487, 1501,
  432.      1515,  711, 1529, 1537, 1544,  712,  743, 1557, 1571
  433.     } ;
  434.  
  435. static const short int yy_def[470] =
  436.     {   0,
  437.       407,  407,  408,  408,  409,  410,  411,  411,  407,    9,
  438.       412,  412,  407,   13,  413,  413,  414,  414,  415,  415,
  439.       416,  416,  417,  417,  407,   25,  418,  418,  413,  413,
  440.       419,  419,  420,  420,  421,  421,  407,   37,  422,  422,
  441.        37,   37,  407,  407,  407,  407,  407,  423,  407,  407,
  442.       407,  424,  407,  425,  407,  407,  407,  407,  407,  407,
  443.       407,  407,  426,  427,  407,  407,  407,  407,  407,  407,
  444.       407,  428,  428,  407,  429,  430,  429,  429,  431,  407,
  445.       432,  432,  407,  407,  433,  433,  433,  432,  434,  407,
  446.       434,  407,  407,  407,  407,  435,  407,  407,  407,  407,
  447.  
  448.       407,  407,  407,  407,  407,  407,  407,  427,  407,  436,
  449.       437,  407,  407,  407,  438,  427,  407,  439,  439,  407,
  450.       407,  440,  407,  441,  441,  441,  407,  407,  442,  442,
  451.       407,  407,  407,  407,  443,  443,  407,  407,  444,  444,
  452.       407,  407,  445,  445,  407,  407,  446,  447,  447,  447,
  453.       407,  447,  407,  448,  448,  448,  449,  407,  449,  407,
  454.       449,  449,  447,  407,  407,  407,  407,  423,  407,  407,
  455.       407,  407,  450,  451,  407,  407,  407,  452,  407,  453,
  456.       454,  407,  425,  407,  407,  407,  407,  455,  407,  407,
  457.       407,  407,  407,  456,  426,  407,  407,  457,  458,  407,
  458.  
  459.       407,  407,  407,  407,  407,  459,  407,  428,  407,  429,
  460.       430,  430,  460,  461,  431,  407,  432,  407,  433,  433,
  461.       433,  407,  434,  407,  407,  407,  435,  407,  407,  407,
  462.       407,  407,  462,  407,  407,  407,  407,  439,  407,  440,
  463.       407,  440,  407,  441,  441,  441,  442,  442,  407,  407,
  464.       407,  407,  443,  407,  463,  444,  444,  407,  407,  407,
  465.       407,  445,  407,  407,  447,  447,  447,  407,  407,  448,
  466.       448,  448,  449,  407,  407,  449,  449,  407,  450,  451,
  467.       407,  407,  407,  407,  407,  407,  464,  407,  407,  465,
  468.       454,  454,  407,  407,  455,  455,  407,  407,  456,  456,
  469.  
  470.       456,  456,  407,  466,  458,  201,  407,  459,  460,  461,
  471.       433,  433,  222,  222,  407,  222,  407,  467,  441,  441,
  472.       463,  463,  407,  269,  269,  448,  448,  449,  449,  407,
  473.       407,  407,  407,  464,  407,  407,  465,  407,  407,  407,
  474.       407,  407,  456,  456,  456,  456,  407,  433,  433,  407,
  475.       407,  316,  407,  441,  441,  407,  407,  448,  448,  449,
  476.       449,  407,  407,  407,  407,  407,  456,  456,  456,  456,
  477.       433,  433,  441,  441,  448,  448,  449,  449,  468,  407,
  478.       407,  407,  456,  456,  433,  433,  441,  441,  448,  448,
  479.       449,  449,  468,  468,  407,  407,  407,  407,  407,  407,
  480.  
  481.       469,  469,  469,  407,  407,  407,    0,  407,  407,  407,
  482.       407,  407,  407,  407,  407,  407,  407,  407,  407,  407,
  483.       407,  407,  407,  407,  407,  407,  407,  407,  407,  407,
  484.       407,  407,  407,  407,  407,  407,  407,  407,  407,  407,
  485.       407,  407,  407,  407,  407,  407,  407,  407,  407,  407,
  486.       407,  407,  407,  407,  407,  407,  407,  407,  407,  407,
  487.       407,  407,  407,  407,  407,  407,  407,  407,  407
  488.     } ;
  489.  
  490. static const short int yy_nxt[1659] =
  491.     {   0,
  492.        44,   45,   46,   47,   44,   44,   44,   44,   44,   44,
  493.        44,   44,   44,   44,   44,   44,   44,   44,   44,   44,
  494.        48,   48,   48,   48,   48,   48,   48,   48,   48,   48,
  495.        48,   48,   48,   48,   48,   48,   48,   48,   48,   48,
  496.        44,   44,   44,   44,   49,   50,   51,   44,   44,   52,
  497.        44,   44,   44,   44,   44,   53,   44,   44,   44,   44,
  498.        44,   44,   44,   54,   54,   54,   54,   54,   54,   54,
  499.        54,   54,   54,   54,   54,   54,   54,   54,   54,   54,
  500.        54,   54,   54,   44,   44,   44,   56,   57,   58,   59,
  501.        60,   73,   74,   61,   61,  130,  131,   61,  213,   62,
  502.  
  503.       214,   63,   64,   76,   77,   74,  130,  131,   78,   90,
  504.        91,   92,   90,   91,   92,  164,  165,  166,  105,  106,
  505.       107,  105,  106,  107,  406,   65,   61,   66,   67,   68,
  506.        59,   60,   69,  108,   61,   61,  108,   44,   61,  235,
  507.        70,   44,   63,   64,  241,   71,  235,  113,  114,  113,
  508.       114,  110,  406,  111,  242,  110,  115,  111,  115,  169,
  509.       170,  171,  116,  117,  116,  117,   65,   61,   81,   81,
  510.        82,   83,   81,   81,   81,   81,   81,   84,   81,   81,
  511.        81,   81,   81,   81,   81,   81,   81,   81,   85,   85,
  512.        85,   85,   85,   85,   85,   85,   85,   85,   85,   85,
  513.  
  514.        85,   85,   86,   85,   85,   85,   85,   87,   81,   81,
  515.        81,   93,   93,   93,   44,   93,   93,   93,   93,   93,
  516.        94,   94,   93,   93,   93,   93,   95,   93,   93,   93,
  517.        93,   96,   96,   96,   96,   96,   96,   96,   96,   96,
  518.        96,   96,   96,   96,   96,   96,   96,   96,   96,   96,
  519.        96,   93,   93,   93,   99,  100,   99,  100,  206,  136,
  520.       137,  197,  101,  197,  101,  102,  138,  102,  136,  137,
  521.       140,  141,  140,  141,  288,  138,  400,  142,  289,  142,
  522.       144,  145,  146,  190,  191,  192,  198,  345,  198,  248,
  523.       249,  300,  207,  401,  103,  147,  103,  118,  118,  119,
  524.  
  525.       120,  121,  118,  118,  122,  118,  118,  118,  118,  123,
  526.       118,  118,  118,  118,  118,  118,  118,  124,  124,  124,
  527.       124,  124,  124,  124,  124,  124,  124,  124,  124,  124,
  528.       124,  125,  124,  124,  124,  124,  126,  127,  118,  128,
  529.       132,  133,  132,  133,  144,  145,  146,  232,  197,  248,
  530.       250,  257,  258,  257,  259,  266,  164,  165,  166,  147,
  531.       267,  169,  170,  171,  281,  282,  283,  292,  293,  296,
  532.       297,  241,  233,  198,  248,  249,  284,  248,  250,  400,
  533.       134,  242,  134,  148,  149,  150,  151,  148,  148,  152,
  534.       148,  148,  153,  148,  148,  148,  148,  148,  148,  148,
  535.  
  536.       148,  148,  148,  154,  154,  154,  154,  154,  154,  154,
  537.       154,  154,  154,  154,  154,  154,  154,  155,  154,  154,
  538.       154,  154,  156,  148,  148,  148,  158,  159,  160,  158,
  539.       159,  160,  184,  185,  186,  300,  301,  187,  202,  203,
  540.       204,  322,  323,  187,  281,  282,  283,  367,  281,  282,
  541.       283,  300,  184,  185,  186,  300,  284,  187,  266,  161,
  542.       284,  302,  161,  267,  162,  257,  258,  162,  174,  257,
  543.       259,  398,  188,  397,  281,  282,  283,  285,  188,  286,
  544.       292,  293,  396,  175,  392,  176,  284,  176,  292,  338,
  545.       391,  176,  188,  176,  176,  177,  176,  178,  390,  179,
  546.  
  547.       180,  389,  181,  199,  199,  199,  388,  199,  199,  199,
  548.       199,  199,  199,  199,  199,  199,  200,  199,  199,  199,
  549.       199,  199,  199,  201,  201,  201,  201,  201,  201,  201,
  550.       201,  201,  201,  201,  201,  201,  201,  201,  201,  201,
  551.       201,  201,  201,  199,  199,  199,  305,  305,  305,  387,
  552.       305,  305,  305,  305,  305,  305,  305,  306,  305,  306,
  553.       305,  305,  305,  305,  305,  305,  306,  306,  306,  306,
  554.       306,  306,  306,  306,  306,  306,  306,  306,  306,  306,
  555.       306,  306,  306,  306,  306,  306,  305,  305,  307,  202,
  556.       203,  204,  296,  297,  187,  331,  282,  283,  296,  340,
  557.  
  558.       343,  322,  323,  322,  356,  299,  386,  284,  331,  282,
  559.       283,  369,  383,  394,  395,  300,  300,  394,  395,  394,
  560.       399,  403,  404,  403,  404,  344,  403,  405,  385,  188,
  561.       313,  313,  314,  315,  313,  313,  313,  313,  313,  316,
  562.       313,  313,  313,  313,  313,  313,  313,  313,  313,  313,
  563.       316,  316,  316,  316,  316,  316,  316,  316,  316,  316,
  564.       316,  316,  316,  316,  316,  316,  316,  316,  316,  316,
  565.       313,  313,  313,  324,  324,  324,  300,  324,  324,  324,
  566.       324,  324,  325,  324,  324,  324,  324,  324,  324,  324,
  567.       324,  324,  324,  325,  325,  325,  325,  325,  325,  325,
  568.  
  569.       325,  325,  325,  325,  325,  325,  325,  325,  325,  325,
  570.       325,  325,  325,  324,  324,  324,  346,  304,  318,  347,
  571.       300,  304,  318,  347,  346,  346,  346,  346,  346,  346,
  572.       316,  316,  352,  300,  316,  316,  316,  316,  316,  382,
  573.       316,  316,  316,  316,  316,  316,  316,  316,  316,  316,
  574.       353,  381,  380,  379,  353,  378,  377,  376,  375,  357,
  575.       374,  373,  350,  351,  372,  371,  366,  341,  339,  365,
  576.       316,  316,  316,  325,  325,  325,  364,  325,  325,  325,
  577.       325,  325,  363,  325,  325,  325,  325,  325,  325,  325,
  578.       325,  325,  325,  362,  361,  360,  359,  358,  357,  355,
  579.  
  580.       354,  231,  351,  350,  349,  348,  196,  300,  342,  341,
  581.       339,  336,  335,  325,  325,  325,  368,  333,  332,  330,
  582.       300,  330,  329,  328,  368,  368,  368,  368,  368,  368,
  583.       370,  274,  327,  326,  300,  269,  260,  260,  370,  370,
  584.       370,  370,  370,  370,  384,  251,  251,  320,  300,  319,
  585.       317,  229,  384,  384,  384,  384,  384,  384,   55,   55,
  586.        55,   55,   55,   55,   55,   55,   55,   55,   55,   55,
  587.        55,   55,   72,   72,   72,   72,   72,   72,   72,   72,
  588.        72,   72,   72,   72,   72,   72,   75,   75,   75,   75,
  589.        75,   75,   75,   75,   75,   75,   75,   75,   75,   75,
  590.  
  591.        79,   79,   79,   79,   79,   79,   79,   79,   79,   79,
  592.        79,   79,   79,   79,   89,   89,   89,   89,   89,   89,
  593.        89,   89,   89,   89,   89,   89,   89,   89,   44,   44,
  594.        44,   44,   44,   44,   44,   44,   44,   44,   44,   44,
  595.        44,   44,   98,   98,   98,   98,   98,   98,   98,   98,
  596.        98,   98,   98,   98,   98,   98,  104,  104,  104,  104,
  597.       104,  104,  104,  104,  104,  104,  104,  104,  104,  104,
  598.       109,  109,  109,  109,  109,  109,  109,  109,  109,  109,
  599.       109,  109,  109,  109,  112,  112,  112,  112,  112,  112,
  600.       112,  112,  112,  112,  112,  112,  112,  112,  129,  129,
  601.  
  602.       129,  129,  129,  129,  129,  129,  129,  129,  129,  129,
  603.       129,  129,  135,  135,  135,  135,  135,  135,  135,  135,
  604.       135,  135,  135,  135,  135,  135,  139,  139,  139,  139,
  605.       139,  139,  139,  139,  139,  139,  139,  139,  139,  139,
  606.       143,  143,  143,  143,  143,  143,  143,  143,  143,  143,
  607.       143,  143,  143,  143,  157,  157,  157,  157,  157,  157,
  608.       157,  157,  157,  157,  157,  157,  157,  157,  168,  168,
  609.       224,  312,  168,  168,  168,  173,  173,  173,  173,  173,
  610.       173,  173,  173,  173,  173,  173,  173,  183,  183,  311,
  611.       216,  183,  183,  183,  194,  194,  212,  194,  194,  194,
  612.  
  613.       194,  194,  194,  194,  194,  194,  194,  194,  196,  196,
  614.       205,  196,  196,  196,  196,  196,  196,  196,  196,  196,
  615.       196,  196,  208,  208,  205,  208,  208,  208,  208,  208,
  616.       208,  208,  208,  208,  208,  208,  210,  210,  303,  210,
  617.       210,  210,  210,  210,  210,  210,  210,  210,  210,  210,
  618.       211,  211,  300,  211,  211,  211,  211,  211,  211,  211,
  619.       211,  211,  211,  211,  215,  215,  215,  215,  215,  215,
  620.       215,  215,  215,  215,  215,  215,  215,  215,  217,  217,
  621.       298,  217,  217,  190,  217,  217,  217,  217,  190,  294,
  622.       189,  217,  219,  219,  189,  172,  219,  219,  219,  223,
  623.  
  624.       223,  172,  223,  223,  223,  223,  223,  223,  223,  223,
  625.       223,  223,  223,  227,  227,  167,  167,  227,  227,  227,
  626.       231,  231,  278,  231,  231,  231,  231,  231,  231,  231,
  627.       231,  231,  231,  231,  234,  234,  277,  234,  234,  234,
  628.       234,  234,  234,  234,  234,  234,  234,  234,  237,  237,
  629.       276,  237,  237,  237,  237,  237,  237,  275,  237,  237,
  630.       237,  237,  238,  238,  275,  274,  272,  238,  238,  238,
  631.       238,  238,  240,  240,  271,  240,  240,  240,  240,  240,
  632.       240,  240,  240,  240,  240,  240,  244,  244,  269,  268,
  633.       244,  244,  244,  247,  247,  247,  247,  247,  247,  247,
  634.  
  635.       247,  247,  247,  247,  247,  247,  247,  253,  253,  268,
  636.       253,  253,  263,  253,  253,  253,  253,  253,  253,  253,
  637.       253,  256,  256,  256,  256,  256,  263,  256,  256,  256,
  638.       256,  256,  256,  256,  256,  262,  262,  261,  260,  262,
  639.       262,  262,  262,  255,  262,  262,  262,  262,  262,  264,
  640.       264,  254,  264,  264,  264,  264,  264,  264,  264,  264,
  641.       264,  264,  264,  265,  265,  254,  265,  265,  252,  265,
  642.       265,  265,  265,  252,  251,  246,  265,  270,  270,  245,
  643.       243,  270,  270,  270,  273,  239,  239,  273,  273,  273,
  644.       273,  273,  273,  273,  273,  273,  273,  273,  279,  279,
  645.  
  646.       236,  279,  279,  279,  279,  279,  279,  279,  279,  279,
  647.       279,  279,  280,  280,  236,  280,  280,  280,  280,  280,
  648.       280,  280,  280,  280,  280,  280,  287,  287,  287,  290,
  649.       290,  290,  291,  291,  291,  291,  291,  291,  291,  291,
  650.       291,  291,  291,  291,  291,  291,  295,  295,  295,  295,
  651.       295,  295,  295,  295,  295,  295,  295,  295,  295,  295,
  652.       299,  299,  230,  299,  299,  299,  299,  299,  299,  230,
  653.       299,  299,  299,  299,  305,  305,  229,  305,  305,  305,
  654.       305,  305,  305,  305,  305,  305,  305,  308,  308,  228,
  655.       308,  308,  308,  308,  308,  308,  308,  308,  308,  308,
  656.  
  657.       308,  309,  309,  228,  309,  309,  309,  309,  309,  309,
  658.       309,  309,  309,  309,  309,  310,  310,  226,  310,  310,
  659.       310,  310,  310,  310,  310,  310,  310,  310,  310,  321,
  660.       321,  321,  321,  321,  321,  321,  321,  321,  321,  321,
  661.       321,  321,  321,  334,  334,  225,  225,  334,  334,  334,
  662.       337,  337,  224,  222,  337,  337,  337,  393,  393,  393,
  663.       393,  393,  393,  393,  393,  393,  393,  393,  393,  393,
  664.       393,  402,  402,  402,  402,  402,  402,  402,  402,  402,
  665.       402,  402,  402,  402,  402,  221,  220,  218,  218,  216,
  666.       209,  212,  209,  209,  193,  205,  205,  195,  193,  189,
  667.  
  668.       189,  182,  172,  172,  167,  167,  407,  163,  163,   97,
  669.        97,   88,   80,   80,   43,  407,  407,  407,  407,  407,
  670.       407,  407,  407,  407,  407,  407,  407,  407,  407,  407,
  671.       407,  407,  407,  407,  407,  407,  407,  407,  407,  407,
  672.       407,  407,  407,  407,  407,  407,  407,  407,  407,  407,
  673.       407,  407,  407,  407,  407,  407,  407,  407
  674.     } ;
  675.  
  676. static const short int yy_chk[1659] =
  677.     {   0,
  678.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  679.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  680.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  681.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  682.         1,    1,    1,    2,    2,    2,    2,    2,    2,    2,
  683.         2,    2,    2,    2,    2,    2,    2,    2,    2,    2,
  684.         2,    2,    2,    2,    2,    2,    2,    2,    2,    2,
  685.         2,    2,    2,    2,    2,    2,    2,    2,    2,    2,
  686.         2,    2,    2,    2,    2,    2,    3,    3,    3,    3,
  687.         3,    5,    5,    3,    3,   27,   27,    3,   78,    3,
  688.  
  689.        78,    3,    3,    6,    6,    6,   28,   28,    6,   11,
  690.        11,   11,   12,   12,   12,   45,   45,   45,   19,   19,
  691.        19,   20,   20,   20,  405,    3,    3,    4,    4,    4,
  692.         4,    4,    4,   19,    4,    4,   20,   21,    4,  111,
  693.         4,   22,    4,    4,  122,    4,  111,   23,   23,   24,
  694.        24,   21,  404,   21,  122,   22,   23,   22,   24,   49,
  695.        49,   49,   23,   23,   24,   24,    4,    4,    9,    9,
  696.         9,    9,    9,    9,    9,    9,    9,    9,    9,    9,
  697.         9,    9,    9,    9,    9,    9,    9,    9,    9,    9,
  698.         9,    9,    9,    9,    9,    9,    9,    9,    9,    9,
  699.  
  700.         9,    9,    9,    9,    9,    9,    9,    9,    9,    9,
  701.         9,   13,   13,   13,   13,   13,   13,   13,   13,   13,
  702.        13,   13,   13,   13,   13,   13,   13,   13,   13,   13,
  703.        13,   13,   13,   13,   13,   13,   13,   13,   13,   13,
  704.        13,   13,   13,   13,   13,   13,   13,   13,   13,   13,
  705.        13,   13,   13,   13,   17,   17,   18,   18,   69,   31,
  706.        31,   64,   17,  108,   18,   17,   31,   18,   32,   32,
  707.        33,   33,   34,   34,  179,   32,  399,   33,  179,   34,
  708.        35,   35,   35,   60,   60,   60,   64,  301,  108,  129,
  709.       129,  301,   69,  396,   17,   35,   18,   25,   25,   25,
  710.  
  711.        25,   25,   25,   25,   25,   25,   25,   25,   25,   25,
  712.        25,   25,   25,   25,   25,   25,   25,   25,   25,   25,
  713.        25,   25,   25,   25,   25,   25,   25,   25,   25,   25,
  714.        25,   25,   25,   25,   25,   25,   25,   25,   25,   25,
  715.        29,   29,   30,   30,   36,   36,   36,  110,  116,  130,
  716.       130,  139,  139,  140,  140,  149,  164,  164,  164,   36,
  717.       149,  169,  169,  169,  176,  176,  176,  181,  181,  188,
  718.       188,  240,  110,  116,  247,  247,  176,  248,  248,  395,
  719.        29,  240,   30,   37,   37,   37,   37,   37,   37,   37,
  720.        37,   37,   37,   37,   37,   37,   37,   37,   37,   37,
  721.  
  722.        37,   37,   37,   37,   37,   37,   37,   37,   37,   37,
  723.        37,   37,   37,   37,   37,   37,   37,   37,   37,   37,
  724.        37,   37,   37,   37,   37,   37,   39,   39,   39,   40,
  725.        40,   40,   56,   56,   56,  384,  195,   56,   66,   66,
  726.        66,  255,  255,   66,  175,  175,  175,  343,  177,  177,
  727.       177,  343,  184,  184,  184,  383,  175,  184,  266,   39,
  728.       177,  195,   40,  266,   39,  256,  256,   40,   52,  257,
  729.       257,  382,   56,  381,  281,  281,  281,  175,   66,  177,
  730.       291,  291,  380,   52,  378,   52,  281,   52,  292,  292,
  731.       377,   52,  184,   52,   52,   52,   52,   52,  376,   52,
  732.  
  733.        52,  375,   52,   65,   65,   65,  374,   65,   65,   65,
  734.        65,   65,   65,   65,   65,   65,   65,   65,   65,   65,
  735.        65,   65,   65,   65,   65,   65,   65,   65,   65,   65,
  736.        65,   65,   65,   65,   65,   65,   65,   65,   65,   65,
  737.        65,   65,   65,   65,   65,   65,  201,  201,  201,  373,
  738.       201,  201,  201,  201,  201,  201,  201,  201,  201,  201,
  739.       201,  201,  201,  201,  201,  201,  201,  201,  201,  201,
  740.       201,  201,  201,  201,  201,  201,  201,  201,  201,  201,
  741.       201,  201,  201,  201,  201,  201,  201,  201,  201,  202,
  742.       202,  202,  295,  295,  202,  284,  284,  284,  296,  296,
  743.  
  744.       300,  321,  321,  322,  322,  300,  372,  284,  331,  331,
  745.       331,  345,  367,  379,  379,  345,  367,  393,  393,  394,
  746.       394,  401,  401,  402,  402,  300,  403,  403,  371,  202,
  747.       222,  222,  222,  222,  222,  222,  222,  222,  222,  222,
  748.       222,  222,  222,  222,  222,  222,  222,  222,  222,  222,
  749.       222,  222,  222,  222,  222,  222,  222,  222,  222,  222,
  750.       222,  222,  222,  222,  222,  222,  222,  222,  222,  222,
  751.       222,  222,  222,  269,  269,  269,  370,  269,  269,  269,
  752.       269,  269,  269,  269,  269,  269,  269,  269,  269,  269,
  753.       269,  269,  269,  269,  269,  269,  269,  269,  269,  269,
  754.  
  755.       269,  269,  269,  269,  269,  269,  269,  269,  269,  269,
  756.       269,  269,  269,  269,  269,  269,  302,  457,  462,  466,
  757.       302,  457,  462,  466,  302,  302,  302,  302,  302,  302,
  758.       316,  316,  316,  369,  316,  316,  316,  316,  316,  366,
  759.       316,  316,  316,  316,  316,  316,  316,  316,  316,  316,
  760.       467,  364,  363,  362,  467,  361,  360,  359,  358,  356,
  761.       355,  354,  352,  350,  349,  348,  342,  340,  338,  336,
  762.       316,  316,  316,  325,  325,  325,  335,  325,  325,  325,
  763.       325,  325,  333,  325,  325,  325,  325,  325,  325,  325,
  764.       325,  325,  325,  332,  329,  328,  327,  326,  323,  320,
  765.  
  766.       319,  317,  315,  314,  312,  311,  303,  299,  298,  297,
  767.       293,  289,  288,  325,  325,  325,  344,  286,  285,  283,
  768.       344,  282,  277,  276,  344,  344,  344,  344,  344,  344,
  769.       346,  274,  272,  271,  346,  267,  259,  258,  346,  346,
  770.       346,  346,  346,  346,  368,  250,  249,  246,  368,  245,
  771.       232,  229,  368,  368,  368,  368,  368,  368,  408,  408,
  772.       408,  408,  408,  408,  408,  408,  408,  408,  408,  408,
  773.       408,  408,  409,  409,  409,  409,  409,  409,  409,  409,
  774.       409,  409,  409,  409,  409,  409,  410,  410,  410,  410,
  775.       410,  410,  410,  410,  410,  410,  410,  410,  410,  410,
  776.  
  777.       411,  411,  411,  411,  411,  411,  411,  411,  411,  411,
  778.       411,  411,  411,  411,  412,  412,  412,  412,  412,  412,
  779.       412,  412,  412,  412,  412,  412,  412,  412,  413,  413,
  780.       413,  413,  413,  413,  413,  413,  413,  413,  413,  413,
  781.       413,  413,  414,  414,  414,  414,  414,  414,  414,  414,
  782.       414,  414,  414,  414,  414,  414,  415,  415,  415,  415,
  783.       415,  415,  415,  415,  415,  415,  415,  415,  415,  415,
  784.       416,  416,  416,  416,  416,  416,  416,  416,  416,  416,
  785.       416,  416,  416,  416,  417,  417,  417,  417,  417,  417,
  786.       417,  417,  417,  417,  417,  417,  417,  417,  418,  418,
  787.  
  788.       418,  418,  418,  418,  418,  418,  418,  418,  418,  418,
  789.       418,  418,  419,  419,  419,  419,  419,  419,  419,  419,
  790.       419,  419,  419,  419,  419,  419,  420,  420,  420,  420,
  791.       420,  420,  420,  420,  420,  420,  420,  420,  420,  420,
  792.       421,  421,  421,  421,  421,  421,  421,  421,  421,  421,
  793.       421,  421,  421,  421,  422,  422,  422,  422,  422,  422,
  794.       422,  422,  422,  422,  422,  422,  422,  422,  423,  423,
  795.       224,  221,  423,  423,  423,  424,  424,  424,  424,  424,
  796.       424,  424,  424,  424,  424,  424,  424,  425,  425,  220,
  797.       215,  425,  425,  425,  426,  426,  212,  426,  426,  426,
  798.  
  799.       426,  426,  426,  426,  426,  426,  426,  426,  427,  427,
  800.       204,  427,  427,  427,  427,  427,  427,  427,  427,  427,
  801.       427,  427,  428,  428,  203,  428,  428,  428,  428,  428,
  802.       428,  428,  428,  428,  428,  428,  429,  429,  197,  429,
  803.       429,  429,  429,  429,  429,  429,  429,  429,  429,  429,
  804.       430,  430,  194,  430,  430,  430,  430,  430,  430,  430,
  805.       430,  430,  430,  430,  431,  431,  431,  431,  431,  431,
  806.       431,  431,  431,  431,  431,  431,  431,  431,  432,  432,
  807.       193,  432,  432,  192,  432,  432,  432,  432,  191,  187,
  808.       186,  432,  433,  433,  185,  171,  433,  433,  433,  434,
  809.  
  810.       434,  170,  434,  434,  434,  434,  434,  434,  434,  434,
  811.       434,  434,  434,  435,  435,  166,  165,  435,  435,  435,
  812.       436,  436,  163,  436,  436,  436,  436,  436,  436,  436,
  813.       436,  436,  436,  436,  437,  437,  162,  437,  437,  437,
  814.       437,  437,  437,  437,  437,  437,  437,  437,  438,  438,
  815.       161,  438,  438,  438,  438,  438,  438,  160,  438,  438,
  816.       438,  438,  439,  439,  159,  158,  156,  439,  439,  439,
  817.       439,  439,  440,  440,  155,  440,  440,  440,  440,  440,
  818.       440,  440,  440,  440,  440,  440,  441,  441,  152,  151,
  819.       441,  441,  441,  442,  442,  442,  442,  442,  442,  442,
  820.  
  821.       442,  442,  442,  442,  442,  442,  442,  443,  443,  150,
  822.       443,  443,  145,  443,  443,  443,  443,  443,  443,  443,
  823.       443,  444,  444,  444,  444,  444,  144,  444,  444,  444,
  824.       444,  444,  444,  444,  444,  445,  445,  142,  141,  445,
  825.       445,  445,  445,  138,  445,  445,  445,  445,  445,  446,
  826.       446,  137,  446,  446,  446,  446,  446,  446,  446,  446,
  827.       446,  446,  446,  447,  447,  136,  447,  447,  133,  447,
  828.       447,  447,  447,  132,  131,  126,  447,  448,  448,  125,
  829.       123,  448,  448,  448,  449,  120,  119,  449,  449,  449,
  830.       449,  449,  449,  449,  449,  449,  449,  449,  450,  450,
  831.  
  832.       114,  450,  450,  450,  450,  450,  450,  450,  450,  450,
  833.       450,  450,  451,  451,  113,  451,  451,  451,  451,  451,
  834.       451,  451,  451,  451,  451,  451,  452,  452,  452,  453,
  835.       453,  453,  454,  454,  454,  454,  454,  454,  454,  454,
  836.       454,  454,  454,  454,  454,  454,  455,  455,  455,  455,
  837.       455,  455,  455,  455,  455,  455,  455,  455,  455,  455,
  838.       456,  456,  106,  456,  456,  456,  456,  456,  456,  105,
  839.       456,  456,  456,  456,  458,  458,  102,  458,  458,  458,
  840.       458,  458,  458,  458,  458,  458,  458,  459,  459,  100,
  841.       459,  459,  459,  459,  459,  459,  459,  459,  459,  459,
  842.  
  843.       459,  460,  460,   99,  460,  460,  460,  460,  460,  460,
  844.       460,  460,  460,  460,  460,  461,  461,   95,  461,  461,
  845.       461,  461,  461,  461,  461,  461,  461,  461,  461,  463,
  846.       463,  463,  463,  463,  463,  463,  463,  463,  463,  463,
  847.       463,  463,  463,  464,  464,   92,   91,  464,  464,  464,
  848.       465,  465,   90,   88,  465,  465,  465,  468,  468,  468,
  849.       468,  468,  468,  468,  468,  468,  468,  468,  468,  468,
  850.       468,  469,  469,  469,  469,  469,  469,  469,  469,  469,
  851.       469,  469,  469,  469,  469,   87,   86,   83,   82,   79,
  852.        77,   76,   74,   73,   70,   68,   67,   63,   62,   58,
  853.  
  854.        57,   53,   51,   50,   47,   46,   43,   42,   41,   16,
  855.        15,   10,    8,    7,  407,  407,  407,  407,  407,  407,
  856.       407,  407,  407,  407,  407,  407,  407,  407,  407,  407,
  857.       407,  407,  407,  407,  407,  407,  407,  407,  407,  407,
  858.       407,  407,  407,  407,  407,  407,  407,  407,  407,  407,
  859.       407,  407,  407,  407,  407,  407,  407,  407
  860.     } ;
  861.  
  862. static yy_state_type yy_last_accepting_state;
  863. static char *yy_last_accepting_cpos;
  864.  
  865. /* The intent behind this definition is that it'll catch
  866.  * any uses of REJECT which flex missed.
  867.  */
  868. #define REJECT reject_used_but_not_detected
  869. #define yymore() yymore_used_but_not_detected
  870. #define YY_MORE_ADJ 0
  871. char *yytext;
  872. # line 1 "scan.l"
  873. /* scan.l - scanner for flex input */
  874. # line 4 "scan.l"
  875. /*-
  876.  * Copyright (c) 1990 The Regents of the University of California.
  877.  * All rights reserved.
  878.  *
  879.  * This code is derived from software contributed to Berkeley by
  880.  * Vern Paxson.
  881.  * 
  882.  * The United States Government has rights in this work pursuant
  883.  * to contract no. DE-AC03-76SF00098 between the United States
  884.  * Department of Energy and the University of California.
  885.  *
  886.  * Redistribution and use in source and binary forms are permitted provided
  887.  * that: (1) source distributions retain this entire copyright notice and
  888.  * comment, and (2) distributions including binaries display the following
  889.  * acknowledgement:  ``This product includes software developed by the
  890.  * University of California, Berkeley and its contributors'' in the
  891.  * documentation or other materials provided with the distribution and in
  892.  * all advertising materials mentioning features or use of this software.
  893.  * Neither the name of the University nor the names of its contributors may
  894.  * be used to endorse or promote products derived from this software without
  895.  * specific prior written permission.
  896.  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
  897.  * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
  898.  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  899.  */
  900.  
  901. /* $Header: scan.l,v 1.2 94/01/04 14:33:09 vern Exp $ */
  902.  
  903. #include "flexdef.h"
  904. #include "parse.h"
  905.  
  906. #define ACTION_ECHO add_action( yytext )
  907. #define MARK_END_OF_PROLOG mark_prolog();
  908.  
  909. #define YY_DECL \
  910.     int flexscan()
  911.  
  912. #define RETURNCHAR \
  913.     yylval = (unsigned char) yytext[0]; \
  914.     return CHAR;
  915.  
  916. #define RETURNNAME \
  917.     strcpy( nmstr, yytext ); \
  918.     return NAME;
  919.  
  920. #define PUT_BACK_STRING(str, start) \
  921.     for ( i = strlen( str ) - 1; i >= start; --i ) \
  922.         unput((str)[i])
  923.  
  924. #define CHECK_REJECT(str) \
  925.     if ( all_upper( str ) ) \
  926.         reject = true;
  927.  
  928. #define CHECK_YYMORE(str) \
  929.     if ( all_lower( str ) ) \
  930.         yymore_used = true;
  931.  
  932. /* Macros after this point can all be overridden by user definitions in
  933.  * section 1.
  934.  */
  935.  
  936. #ifdef YY_MALLOC_DECL
  937. YY_MALLOC_DECL
  938. #else
  939. #if __STDC__
  940. #ifndef __cplusplus
  941. #include <stdlib.h>
  942. #endif
  943. #else
  944. /* Just try to get by without declaring the routines.  This will fail
  945.  * miserably on non-ANSI systems for which sizeof(size_t) != sizeof(int)
  946.  * or sizeof(void*) != sizeof(int).
  947.  */
  948. #endif
  949. #endif
  950.  
  951. /* Amount of stuff to slurp up with each read. */
  952. #ifndef YY_READ_BUF_SIZE
  953. #define YY_READ_BUF_SIZE 8192
  954. #endif
  955.  
  956. /* Copy whatever the last rule matched to the standard output. */
  957.  
  958. #ifndef ECHO
  959. /* This used to be an fputs(), but since the string might contain NUL's,
  960.  * we now use fwrite().
  961.  */
  962. #define ECHO (void) fwrite( yytext, yyleng, 1, yyout )
  963. #endif
  964.  
  965. /* Gets input and stuffs it into "buf".  number of characters read, or YY_NULL,
  966.  * is returned in "result".
  967.  */
  968. #ifndef YY_INPUT
  969. #define YY_INPUT(buf,result,max_size) \
  970.     if ( yy_current_buffer->yy_is_interactive ) \
  971.         { \
  972.         int c = getc( yyin ); \
  973.         result = c == EOF ? 0 : 1; \
  974.         buf[0] = (char) c; \
  975.         } \
  976.     else if ( ((result = fread( buf, 1, max_size, yyin )) == 0) \
  977.           && ferror( yyin ) ) \
  978.         YY_FATAL_ERROR( "input in flex scanner failed" );
  979. #endif
  980.  
  981. /* No semi-colon after return; correct usage is to write "yyterminate();" -
  982.  * we don't want an extra ';' after the "return" because that will cause
  983.  * some compilers to complain about unreachable statements.
  984.  */
  985. #ifndef yyterminate
  986. #define yyterminate() return YY_NULL
  987. #endif
  988.  
  989. /* Number of entries by which start-condition stack grows. */
  990. #ifndef YY_START_STACK_INCR
  991. #define YY_START_STACK_INCR 25
  992. #endif
  993.  
  994. /* Report a fatal error. */
  995. #ifndef YY_FATAL_ERROR
  996. #define YY_FATAL_ERROR(msg) yy_fatal_error( msg )
  997. #endif
  998.  
  999. /* Default declaration of generated scanner - a define so the user can
  1000.  * easily add parameters.
  1001.  */
  1002. #ifndef YY_DECL
  1003. #define YY_DECL int yylex YY_PROTO(( void ))
  1004. #endif
  1005.  
  1006. /* Code executed at the beginning of each rule, after yytext and yyleng
  1007.  * have been set up.
  1008.  */
  1009. #ifndef YY_USER_ACTION
  1010. #define YY_USER_ACTION
  1011. #endif
  1012.  
  1013. /* Code executed at the end of each rule. */
  1014. #ifndef YY_BREAK
  1015. #define YY_BREAK break;
  1016. #endif
  1017.  
  1018. YY_DECL
  1019.     {
  1020.     register yy_state_type yy_current_state;
  1021.     register char *yy_cp, *yy_bp;
  1022.     register int yy_act;
  1023.  
  1024. # line 82 "scan.l"
  1025.  
  1026.     static int bracelevel, didadef, indented_code, checking_used;
  1027.  
  1028.     int doing_codeblock = false;
  1029.     int i;
  1030.     Char nmdef[MAXLINE], myesc();
  1031.  
  1032.  
  1033.  
  1034.     if ( yy_init )
  1035.         {
  1036. #ifdef YY_USER_INIT
  1037.         YY_USER_INIT;
  1038. #endif
  1039.  
  1040.         if ( ! yy_start )
  1041.             yy_start = 1;    /* first start state */
  1042.  
  1043.         if ( ! yyin )
  1044.             yyin = stdin;
  1045.  
  1046.         if ( ! yyout )
  1047.             yyout = stdout;
  1048.  
  1049.         if ( yy_current_buffer )
  1050.             yy_init_buffer( yy_current_buffer, yyin );
  1051.         else
  1052.             yy_current_buffer =
  1053.                 yy_create_buffer( yyin, YY_BUF_SIZE );
  1054.  
  1055.         yy_load_buffer_state();
  1056.  
  1057.         yy_init = 0;
  1058.         }
  1059.  
  1060.     while ( 1 )        /* loops until end-of-file is reached */
  1061.         {
  1062.         yy_cp = yy_c_buf_p;
  1063.  
  1064.         /* Support of yytext. */
  1065.         *yy_cp = yy_hold_char;
  1066.  
  1067.         /* yy_bp points to the position in yy_ch_buf of the start of
  1068.          * the current run.
  1069.          */
  1070.         yy_bp = yy_cp;
  1071.  
  1072.         yy_current_state = yy_start;
  1073.         if ( yy_bp[-1] == '\n' )
  1074.             ++yy_current_state;
  1075. yy_match:
  1076.         do
  1077.             {
  1078.             register YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)];
  1079.             if ( yy_accept[yy_current_state] )
  1080.                 {
  1081.                 yy_last_accepting_state = yy_current_state;
  1082.                 yy_last_accepting_cpos = yy_cp;
  1083.                 }
  1084.             while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
  1085.                 {
  1086.                 yy_current_state = (int) yy_def[yy_current_state];
  1087.                 if ( yy_current_state >= 408 )
  1088.                     yy_c = yy_meta[(unsigned int) yy_c];
  1089.                 }
  1090.             yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
  1091.             ++yy_cp;
  1092.             }
  1093.         while ( yy_base[yy_current_state] != 1615 );
  1094.  
  1095. yy_find_action:
  1096.         yy_act = yy_accept[yy_current_state];
  1097.  
  1098.         YY_DO_BEFORE_ACTION;
  1099.  
  1100.  
  1101. do_action:    /* This label is used only to access EOF actions. */
  1102.  
  1103.  
  1104.         switch ( yy_act )
  1105.     { /* beginning of action switch */
  1106.             case 0: /* must back up */
  1107.             /* undo the effects of YY_DO_BEFORE_ACTION */
  1108.             *yy_cp = yy_hold_char;
  1109.             yy_cp = yy_last_accepting_cpos;
  1110.             yy_current_state = yy_last_accepting_state;
  1111.             goto yy_find_action;
  1112.  
  1113. case 1:
  1114. YY_USER_ACTION
  1115. # line 90 "scan.l"
  1116. indented_code = true; BEGIN(CODEBLOCK);
  1117.     YY_BREAK
  1118. case 2:
  1119. YY_USER_ACTION
  1120. # line 91 "scan.l"
  1121. ACTION_ECHO; BEGIN(C_COMMENT);
  1122.     YY_BREAK
  1123. case 3:
  1124. YY_USER_ACTION
  1125. # line 92 "scan.l"
  1126. return SCDECL;
  1127.     YY_BREAK
  1128. case 4:
  1129. YY_USER_ACTION
  1130. # line 93 "scan.l"
  1131. return XSCDECL;
  1132.     YY_BREAK
  1133. case 5:
  1134. YY_USER_ACTION
  1135. # line 94 "scan.l"
  1136. {
  1137.             ++linenum;
  1138.             line_directive_out( (FILE *) 0 );
  1139.             indented_code = false;
  1140.             BEGIN(CODEBLOCK);
  1141.             }
  1142.     YY_BREAK
  1143. case 6:
  1144. YY_USER_ACTION
  1145. # line 101 "scan.l"
  1146. return WHITESPACE;
  1147.     YY_BREAK
  1148. case 7:
  1149. YY_USER_ACTION
  1150. # line 103 "scan.l"
  1151. {
  1152.             sectnum = 2;
  1153.             bracelevel = 0;
  1154.             mark_defs1();
  1155.             line_directive_out( (FILE *) 0 );
  1156.             BEGIN(SECT2PROLOG);
  1157.             return SECTEND;
  1158.             }
  1159.     YY_BREAK
  1160. case 8:
  1161. YY_USER_ACTION
  1162. # line 112 "scan.l"
  1163. {
  1164.             if ( lex_compat )
  1165.                 warn( "%pointer incompatible with -l option" );
  1166.             else
  1167.                 yytext_is_array = false;
  1168.             ++linenum;
  1169.             }
  1170.     YY_BREAK
  1171. case 9:
  1172. YY_USER_ACTION
  1173. # line 119 "scan.l"
  1174. {
  1175.             if ( C_plus_plus )
  1176.                 warn( "%array incompatible with -+ option" );
  1177.             else
  1178.                 yytext_is_array = true;
  1179.             ++linenum;
  1180.             }
  1181.     YY_BREAK
  1182. case 10:
  1183. YY_USER_ACTION
  1184. # line 127 "scan.l"
  1185. {
  1186.             warn( "%used/%unused have been deprecated" );
  1187.             checking_used = REALLY_USED; BEGIN(USED_LIST);
  1188.             }
  1189.     YY_BREAK
  1190. case 11:
  1191. YY_USER_ACTION
  1192. # line 131 "scan.l"
  1193. {
  1194.             warn( "%used/%unused have been deprecated" );
  1195.             checking_used = REALLY_NOT_USED; BEGIN(USED_LIST);
  1196.             }
  1197.     YY_BREAK
  1198. case 12:
  1199. YY_USER_ACTION
  1200. # line 137 "scan.l"
  1201. ++linenum;    /* ignore */
  1202.     YY_BREAK
  1203. case 13:
  1204. YY_USER_ACTION
  1205. # line 139 "scan.l"
  1206. synerr( "unrecognized '%' directive" );
  1207.     YY_BREAK
  1208. case 14:
  1209. YY_USER_ACTION
  1210. # line 141 "scan.l"
  1211. {
  1212.             strcpy( nmstr, yytext );
  1213.             didadef = false;
  1214.             BEGIN(PICKUPDEF);
  1215.             }
  1216.     YY_BREAK
  1217. case 15:
  1218. YY_USER_ACTION
  1219. # line 147 "scan.l"
  1220. RETURNNAME;
  1221.     YY_BREAK
  1222. case 16:
  1223. YY_USER_ACTION
  1224. # line 148 "scan.l"
  1225. ++linenum; /* allows blank lines in section 1 */
  1226.     YY_BREAK
  1227. case 17:
  1228. YY_USER_ACTION
  1229. # line 149 "scan.l"
  1230. ++linenum; return '\n';
  1231.     YY_BREAK
  1232. case 18:
  1233. YY_USER_ACTION
  1234. # line 152 "scan.l"
  1235. ACTION_ECHO; BEGIN(INITIAL);
  1236.     YY_BREAK
  1237. case 19:
  1238. YY_USER_ACTION
  1239. # line 153 "scan.l"
  1240. ++linenum; ACTION_ECHO; BEGIN(INITIAL);
  1241.     YY_BREAK
  1242. case 20:
  1243. YY_USER_ACTION
  1244. # line 154 "scan.l"
  1245. ACTION_ECHO;
  1246.     YY_BREAK
  1247. case 21:
  1248. YY_USER_ACTION
  1249. # line 155 "scan.l"
  1250. ACTION_ECHO;
  1251.     YY_BREAK
  1252. case 22:
  1253. YY_USER_ACTION
  1254. # line 156 "scan.l"
  1255. ++linenum; ACTION_ECHO;
  1256.     YY_BREAK
  1257. case 23:
  1258. YY_USER_ACTION
  1259. # line 159 "scan.l"
  1260. ++linenum; BEGIN(INITIAL);
  1261.     YY_BREAK
  1262. case 24:
  1263. YY_USER_ACTION
  1264. # line 160 "scan.l"
  1265. ACTION_ECHO; CHECK_REJECT(yytext);
  1266.     YY_BREAK
  1267. case 25:
  1268. YY_USER_ACTION
  1269. # line 161 "scan.l"
  1270. ACTION_ECHO; CHECK_YYMORE(yytext);
  1271.     YY_BREAK
  1272. case 26:
  1273. YY_USER_ACTION
  1274. # line 162 "scan.l"
  1275. ACTION_ECHO;
  1276.     YY_BREAK
  1277. case 27:
  1278. YY_USER_ACTION
  1279. # line 163 "scan.l"
  1280. {
  1281.             ++linenum;
  1282.             ACTION_ECHO;
  1283.             if ( indented_code )
  1284.                 BEGIN(INITIAL);
  1285.             }
  1286.     YY_BREAK
  1287. case 28:
  1288. YY_USER_ACTION
  1289. # line 171 "scan.l"
  1290. /* separates name and definition */
  1291.     YY_BREAK
  1292. case 29:
  1293. YY_USER_ACTION
  1294. # line 173 "scan.l"
  1295. {
  1296.             strcpy( (char *) nmdef, yytext );
  1297.  
  1298.             /* Skip trailing whitespace. */
  1299.             for ( i = strlen( (char *) nmdef ) - 1;
  1300.                   i >= 0 && (nmdef[i] == ' ' || nmdef[i] == '\t');
  1301.                   --i )
  1302.                 ;
  1303.  
  1304.             nmdef[i + 1] = '\0';
  1305.  
  1306.             ndinstal( nmstr, nmdef );
  1307.             didadef = true;
  1308.             }
  1309.     YY_BREAK
  1310. case 30:
  1311. YY_USER_ACTION
  1312. # line 188 "scan.l"
  1313. {
  1314.             if ( ! didadef )
  1315.                 synerr( "incomplete name definition" );
  1316.             BEGIN(INITIAL);
  1317.             ++linenum;
  1318.             }
  1319.     YY_BREAK
  1320. case 31:
  1321. YY_USER_ACTION
  1322. # line 195 "scan.l"
  1323. ++linenum; BEGIN(INITIAL); RETURNNAME;
  1324.     YY_BREAK
  1325. case 32:
  1326. YY_USER_ACTION
  1327. # line 198 "scan.l"
  1328. ++linenum; BEGIN(INITIAL);
  1329.     YY_BREAK
  1330. case 33:
  1331. YY_USER_ACTION
  1332. # line 199 "scan.l"
  1333.  
  1334.     YY_BREAK
  1335. case 34:
  1336. YY_USER_ACTION
  1337. # line 200 "scan.l"
  1338. {
  1339.             if ( all_upper( yytext ) )
  1340.                 reject_really_used = checking_used;
  1341.             else
  1342.                 synerr(
  1343.                 "unrecognized %used/%unused construct" );
  1344.             }
  1345.     YY_BREAK
  1346. case 35:
  1347. YY_USER_ACTION
  1348. # line 207 "scan.l"
  1349. {
  1350.             if ( all_lower( yytext ) )
  1351.                 yymore_really_used = checking_used;
  1352.             else
  1353.                 synerr(
  1354.                 "unrecognized %used/%unused construct" );
  1355.             }
  1356.     YY_BREAK
  1357. case 36:
  1358. YY_USER_ACTION
  1359. # line 214 "scan.l"
  1360. synerr( "unrecognized %used/%unused construct" );
  1361.     YY_BREAK
  1362. case 37:
  1363. YY_USER_ACTION
  1364. # line 217 "scan.l"
  1365. ++bracelevel; yyless( 2 );    /* eat only %{ */
  1366.     YY_BREAK
  1367. case 38:
  1368. YY_USER_ACTION
  1369. # line 218 "scan.l"
  1370. --bracelevel; yyless( 2 );    /* eat only %} */
  1371.     YY_BREAK
  1372. case 39:
  1373. YY_USER_ACTION
  1374. # line 220 "scan.l"
  1375. ACTION_ECHO;    /* indented code in prolog */
  1376.     YY_BREAK
  1377. case 40:
  1378. YY_USER_ACTION
  1379. # line 222 "scan.l"
  1380. {    /* non-indented code */
  1381.             if ( bracelevel <= 0 )
  1382.                 { /* not in %{ ... %} */
  1383.                 yyless( 0 );    /* put it all back */
  1384.                 mark_prolog();
  1385.                 BEGIN(SECT2);
  1386.                 }
  1387.             else
  1388.                 ACTION_ECHO;
  1389.             }
  1390.     YY_BREAK
  1391. case 41:
  1392. YY_USER_ACTION
  1393. # line 233 "scan.l"
  1394. ACTION_ECHO;
  1395.     YY_BREAK
  1396. case 42:
  1397. YY_USER_ACTION
  1398. # line 234 "scan.l"
  1399. ++linenum; ACTION_ECHO;
  1400.     YY_BREAK
  1401. case YY_STATE_EOF(SECT2PROLOG):
  1402. # line 236 "scan.l"
  1403. {
  1404.             mark_prolog();
  1405.             sectnum = 0;
  1406.             yyterminate(); /* to stop the parser */
  1407.             }
  1408.     YY_BREAK
  1409. case 43:
  1410. YY_USER_ACTION
  1411. # line 242 "scan.l"
  1412. ++linenum; /* allow blank lines in section 2 */
  1413.     YY_BREAK
  1414. case 44:
  1415. YY_USER_ACTION
  1416. # line 244 "scan.l"
  1417. {
  1418.             indented_code = (yytext[0] != '%');
  1419.             doing_codeblock = true;
  1420.             bracelevel = 1;
  1421.  
  1422.             if ( indented_code )
  1423.                 ACTION_ECHO;
  1424.  
  1425.             BEGIN(CODEBLOCK_2);
  1426.             }
  1427.     YY_BREAK
  1428. case 45:
  1429. YY_USER_ACTION
  1430. # line 255 "scan.l"
  1431. BEGIN(SC); return '<';
  1432.     YY_BREAK
  1433. case 46:
  1434. YY_USER_ACTION
  1435. # line 256 "scan.l"
  1436. return '^';
  1437.     YY_BREAK
  1438. case 47:
  1439. YY_USER_ACTION
  1440. # line 257 "scan.l"
  1441. BEGIN(QUOTE); return '"';
  1442.     YY_BREAK
  1443. case 48:
  1444. *yy_cp = yy_hold_char; /* undo effects of setting up yytext */
  1445. yy_c_buf_p = yy_cp = yy_bp + 1;
  1446. YY_DO_BEFORE_ACTION; /* set up yytext again */
  1447. YY_USER_ACTION
  1448. # line 258 "scan.l"
  1449. BEGIN(NUM); return '{';
  1450.     YY_BREAK
  1451. case 49:
  1452. YY_USER_ACTION
  1453. # line 259 "scan.l"
  1454. BEGIN(BRACEERROR);
  1455.     YY_BREAK
  1456. case 50:
  1457. *yy_cp = yy_hold_char; /* undo effects of setting up yytext */
  1458. yy_c_buf_p = yy_cp = yy_bp + 1;
  1459. YY_DO_BEFORE_ACTION; /* set up yytext again */
  1460. YY_USER_ACTION
  1461. # line 260 "scan.l"
  1462. return '$';
  1463.     YY_BREAK
  1464. case 51:
  1465. YY_USER_ACTION
  1466. # line 262 "scan.l"
  1467. {
  1468.             bracelevel = 1;
  1469.             BEGIN(PERCENT_BRACE_ACTION);
  1470.             return '\n';
  1471.             }
  1472.     YY_BREAK
  1473. case 52:
  1474. YY_USER_ACTION
  1475. # line 267 "scan.l"
  1476. continued_action = true; ++linenum; return '\n';
  1477.     YY_BREAK
  1478. case 53:
  1479. YY_USER_ACTION
  1480. # line 269 "scan.l"
  1481. {
  1482.             /* This rule is separate from the one below because
  1483.              * otherwise we get variable trailing context, so
  1484.              * we can't build the scanner using -{f,F}.
  1485.              */
  1486.             bracelevel = 0;
  1487.             continued_action = false;
  1488.             BEGIN(ACTION);
  1489.             return '\n';
  1490.             }
  1491.     YY_BREAK
  1492. case 54:
  1493. YY_USER_ACTION
  1494. # line 280 "scan.l"
  1495. {
  1496.             bracelevel = 0;
  1497.             continued_action = false;
  1498.             BEGIN(ACTION);
  1499.             unput( '\n' );    /* so <ACTION> sees it */
  1500.             return '\n';
  1501.             }
  1502.     YY_BREAK
  1503. case 55:
  1504. YY_USER_ACTION
  1505. # line 288 "scan.l"
  1506. return EOF_OP;
  1507.     YY_BREAK
  1508. case 56:
  1509. YY_USER_ACTION
  1510. # line 290 "scan.l"
  1511. {
  1512.             sectnum = 3;
  1513.             BEGIN(SECT3);
  1514.             yyterminate(); /* to stop the parser */
  1515.             }
  1516.     YY_BREAK
  1517. case 57:
  1518. YY_USER_ACTION
  1519. # line 296 "scan.l"
  1520. {
  1521.             int cclval;
  1522.  
  1523.             strcpy( nmstr, yytext );
  1524.  
  1525.             /* Check to see if we've already encountered this
  1526.              * ccl.
  1527.              */
  1528.             if ( (cclval = ccllookup( (Char *) nmstr )) )
  1529.                 {
  1530.                 if ( input() != ']' )
  1531.                     synerr( "bad character class" );
  1532.  
  1533.                 yylval = cclval;
  1534.                 ++cclreuse;
  1535.                 return PREVCCL;
  1536.                 }
  1537.             else
  1538.                 {
  1539.                 /* We fudge a bit.  We know that this ccl will
  1540.                  * soon be numbered as lastccl + 1 by cclinit.
  1541.                  */
  1542.                 cclinstal( (Char *) nmstr, lastccl + 1 );
  1543.  
  1544.                 /* Push back everything but the leading bracket
  1545.                  * so the ccl can be rescanned.
  1546.                  */
  1547.                 yyless( 1 );
  1548.  
  1549.                 BEGIN(FIRSTCCL);
  1550.                 return '[';
  1551.                 }
  1552.             }
  1553.     YY_BREAK
  1554. case 58:
  1555. YY_USER_ACTION
  1556. # line 330 "scan.l"
  1557. {
  1558.             register Char *nmdefptr;
  1559.             Char *ndlookup();
  1560.  
  1561.             strcpy( nmstr, yytext + 1 );
  1562.             nmstr[yyleng - 2] = '\0';  /* chop trailing brace */
  1563.  
  1564.             if ( ! (nmdefptr = ndlookup( nmstr )) )
  1565.                 format_synerr( "undefined definition {%s}",
  1566.                         nmstr );
  1567.  
  1568.             else
  1569.                 { /* push back name surrounded by ()'s */
  1570.                 int len = strlen( (char *) nmdefptr );
  1571.  
  1572.                 if ( lex_compat || nmdefptr[0] == '^' ||
  1573.                      (len > 0 && nmdefptr[len - 1] == '$') )
  1574.                     { /* don't use ()'s after all */
  1575.                     PUT_BACK_STRING((char *) nmdefptr, 0);
  1576.  
  1577.                     if ( nmdefptr[0] == '^' )
  1578.                         BEGIN(CARETISBOL);
  1579.                     }
  1580.  
  1581.                 else
  1582.                     {
  1583.                     unput(')');
  1584.                     PUT_BACK_STRING((char *) nmdefptr, 0);
  1585.                     unput('(');
  1586.                     }
  1587.                 }
  1588.             }
  1589.     YY_BREAK
  1590. case 59:
  1591. YY_USER_ACTION
  1592. # line 363 "scan.l"
  1593. return (unsigned char) yytext[0];
  1594.     YY_BREAK
  1595. case 60:
  1596. YY_USER_ACTION
  1597. # line 364 "scan.l"
  1598. RETURNCHAR;
  1599.     YY_BREAK
  1600. case 61:
  1601. YY_USER_ACTION
  1602. # line 367 "scan.l"
  1603. return (unsigned char) yytext[0];
  1604.     YY_BREAK
  1605. case 62:
  1606. YY_USER_ACTION
  1607. # line 368 "scan.l"
  1608. BEGIN(SECT2); return '>';
  1609.     YY_BREAK
  1610. case 63:
  1611. *yy_cp = yy_hold_char; /* undo effects of setting up yytext */
  1612. yy_c_buf_p = yy_cp = yy_bp + 1;
  1613. YY_DO_BEFORE_ACTION; /* set up yytext again */
  1614. YY_USER_ACTION
  1615. # line 369 "scan.l"
  1616. BEGIN(CARETISBOL); return '>';
  1617.     YY_BREAK
  1618. case 64:
  1619. YY_USER_ACTION
  1620. # line 370 "scan.l"
  1621. RETURNNAME;
  1622.     YY_BREAK
  1623. case 65:
  1624. YY_USER_ACTION
  1625. # line 371 "scan.l"
  1626. {
  1627.             format_synerr( "bad <start condition>: %s", yytext );
  1628.             }
  1629.     YY_BREAK
  1630. case 66:
  1631. YY_USER_ACTION
  1632. # line 375 "scan.l"
  1633. BEGIN(SECT2); return '^';
  1634.     YY_BREAK
  1635. case 67:
  1636. YY_USER_ACTION
  1637. # line 378 "scan.l"
  1638. RETURNCHAR;
  1639.     YY_BREAK
  1640. case 68:
  1641. YY_USER_ACTION
  1642. # line 379 "scan.l"
  1643. BEGIN(SECT2); return '"';
  1644.     YY_BREAK
  1645. case 69:
  1646. YY_USER_ACTION
  1647. # line 381 "scan.l"
  1648. {
  1649.             synerr( "missing quote" );
  1650.             BEGIN(SECT2);
  1651.             ++linenum;
  1652.             return '"';
  1653.             }
  1654.     YY_BREAK
  1655. case 70:
  1656. *yy_cp = yy_hold_char; /* undo effects of setting up yytext */
  1657. yy_c_buf_p = yy_cp = yy_bp + 1;
  1658. YY_DO_BEFORE_ACTION; /* set up yytext again */
  1659. YY_USER_ACTION
  1660. # line 389 "scan.l"
  1661. BEGIN(CCL); return '^';
  1662.     YY_BREAK
  1663. case 71:
  1664. *yy_cp = yy_hold_char; /* undo effects of setting up yytext */
  1665. yy_c_buf_p = yy_cp = yy_bp + 1;
  1666. YY_DO_BEFORE_ACTION; /* set up yytext again */
  1667. YY_USER_ACTION
  1668. # line 390 "scan.l"
  1669. return '^';
  1670.     YY_BREAK
  1671. case 72:
  1672. YY_USER_ACTION
  1673. # line 391 "scan.l"
  1674. BEGIN(CCL); RETURNCHAR;
  1675.     YY_BREAK
  1676. case 73:
  1677. *yy_cp = yy_hold_char; /* undo effects of setting up yytext */
  1678. yy_c_buf_p = yy_cp = yy_bp + 1;
  1679. YY_DO_BEFORE_ACTION; /* set up yytext again */
  1680. YY_USER_ACTION
  1681. # line 393 "scan.l"
  1682. return '-';
  1683.     YY_BREAK
  1684. case 74:
  1685. YY_USER_ACTION
  1686. # line 394 "scan.l"
  1687. RETURNCHAR;
  1688.     YY_BREAK
  1689. case 75:
  1690. YY_USER_ACTION
  1691. # line 395 "scan.l"
  1692. BEGIN(SECT2); return ']';
  1693.     YY_BREAK
  1694. case 76:
  1695. YY_USER_ACTION
  1696. # line 396 "scan.l"
  1697. {
  1698.             synerr( "bad character class" );
  1699.             BEGIN(SECT2);
  1700.             return ']';
  1701.             }
  1702.     YY_BREAK
  1703. case 77:
  1704. YY_USER_ACTION
  1705. # line 403 "scan.l"
  1706. {
  1707.             yylval = myctoi( yytext );
  1708.             return NUMBER;
  1709.             }
  1710.     YY_BREAK
  1711. case 78:
  1712. YY_USER_ACTION
  1713. # line 408 "scan.l"
  1714. return ',';
  1715.     YY_BREAK
  1716. case 79:
  1717. YY_USER_ACTION
  1718. # line 409 "scan.l"
  1719. BEGIN(SECT2); return '}';
  1720.     YY_BREAK
  1721. case 80:
  1722. YY_USER_ACTION
  1723. # line 411 "scan.l"
  1724. {
  1725.             synerr( "bad character inside {}'s" );
  1726.             BEGIN(SECT2);
  1727.             return '}';
  1728.             }
  1729.     YY_BREAK
  1730. case 81:
  1731. YY_USER_ACTION
  1732. # line 417 "scan.l"
  1733. {
  1734.             synerr( "missing }" );
  1735.             BEGIN(SECT2);
  1736.             ++linenum;
  1737.             return '}';
  1738.             }
  1739.     YY_BREAK
  1740. case 82:
  1741. YY_USER_ACTION
  1742. # line 425 "scan.l"
  1743. synerr( "bad name in {}'s" ); BEGIN(SECT2);
  1744.     YY_BREAK
  1745. case 83:
  1746. YY_USER_ACTION
  1747. # line 426 "scan.l"
  1748. synerr( "missing }" ); ++linenum; BEGIN(SECT2);
  1749.     YY_BREAK
  1750. case 84:
  1751. YY_USER_ACTION
  1752. # line 429 "scan.l"
  1753. ACTION_ECHO; BEGIN(ACTION_COMMENT);
  1754.     YY_BREAK
  1755. case 85:
  1756. YY_USER_ACTION
  1757. # line 430 "scan.l"
  1758. bracelevel = 0;
  1759.     YY_BREAK
  1760. case 86:
  1761. YY_USER_ACTION
  1762. # line 431 "scan.l"
  1763. {
  1764.             ACTION_ECHO;
  1765.             CHECK_REJECT(yytext);
  1766.             }
  1767.     YY_BREAK
  1768. case 87:
  1769. YY_USER_ACTION
  1770. # line 435 "scan.l"
  1771. {
  1772.             ACTION_ECHO;
  1773.             CHECK_YYMORE(yytext);
  1774.             }
  1775.     YY_BREAK
  1776. case 88:
  1777. YY_USER_ACTION
  1778. # line 439 "scan.l"
  1779. ACTION_ECHO;
  1780.     YY_BREAK
  1781. case 89:
  1782. YY_USER_ACTION
  1783. # line 440 "scan.l"
  1784. {
  1785.             ++linenum;
  1786.             ACTION_ECHO;
  1787.             if ( bracelevel == 0 ||
  1788.                  (doing_codeblock && indented_code) )
  1789.                 {
  1790.                 if ( ! doing_codeblock )
  1791.                     add_action( "\tYY_BREAK\n" );
  1792.                 
  1793.                 doing_codeblock = false;
  1794.                 BEGIN(SECT2);
  1795.                 }
  1796.             }
  1797.     YY_BREAK
  1798.     /* Reject and YYmore() are checked for above, in PERCENT_BRACE_ACTION */
  1799. case 90:
  1800. YY_USER_ACTION
  1801. # line 456 "scan.l"
  1802. ACTION_ECHO; ++bracelevel;
  1803.     YY_BREAK
  1804. case 91:
  1805. YY_USER_ACTION
  1806. # line 457 "scan.l"
  1807. ACTION_ECHO; --bracelevel;
  1808.     YY_BREAK
  1809. case 92:
  1810. YY_USER_ACTION
  1811. # line 458 "scan.l"
  1812. ACTION_ECHO;
  1813.     YY_BREAK
  1814. case 93:
  1815. YY_USER_ACTION
  1816. # line 459 "scan.l"
  1817. ACTION_ECHO;
  1818.     YY_BREAK
  1819. case 94:
  1820. YY_USER_ACTION
  1821. # line 460 "scan.l"
  1822. ACTION_ECHO; BEGIN(ACTION_COMMENT);
  1823.     YY_BREAK
  1824. case 95:
  1825. YY_USER_ACTION
  1826. # line 461 "scan.l"
  1827. ACTION_ECHO; /* character constant */
  1828.     YY_BREAK
  1829. case 96:
  1830. YY_USER_ACTION
  1831. # line 462 "scan.l"
  1832. ACTION_ECHO; BEGIN(ACTION_STRING);
  1833.     YY_BREAK
  1834. case 97:
  1835. YY_USER_ACTION
  1836. # line 463 "scan.l"
  1837. {
  1838.             ++linenum;
  1839.             ACTION_ECHO;
  1840.             if ( bracelevel == 0 )
  1841.                 {
  1842.                 add_action( "\tYY_BREAK\n" );
  1843.                 BEGIN(SECT2);
  1844.                 }
  1845.             }
  1846.     YY_BREAK
  1847. case 98:
  1848. YY_USER_ACTION
  1849. # line 472 "scan.l"
  1850. ACTION_ECHO;
  1851.     YY_BREAK
  1852. case 99:
  1853. YY_USER_ACTION
  1854. # line 474 "scan.l"
  1855. {
  1856.             ACTION_ECHO;
  1857.             if ( doing_codeblock )
  1858.                 BEGIN(CODEBLOCK_2);
  1859.             else
  1860.                 BEGIN(ACTION);
  1861.             }
  1862.     YY_BREAK
  1863. case 100:
  1864. YY_USER_ACTION
  1865. # line 482 "scan.l"
  1866. ACTION_ECHO;
  1867.     YY_BREAK
  1868. case 101:
  1869. YY_USER_ACTION
  1870. # line 483 "scan.l"
  1871. ACTION_ECHO;
  1872.     YY_BREAK
  1873. case 102:
  1874. YY_USER_ACTION
  1875. # line 484 "scan.l"
  1876. ++linenum; ACTION_ECHO;
  1877.     YY_BREAK
  1878. case 103:
  1879. YY_USER_ACTION
  1880. # line 486 "scan.l"
  1881. ACTION_ECHO;
  1882.     YY_BREAK
  1883. case 104:
  1884. YY_USER_ACTION
  1885. # line 487 "scan.l"
  1886. ACTION_ECHO;
  1887.     YY_BREAK
  1888. case 105:
  1889. YY_USER_ACTION
  1890. # line 488 "scan.l"
  1891. ++linenum; ACTION_ECHO;
  1892.     YY_BREAK
  1893. case 106:
  1894. YY_USER_ACTION
  1895. # line 489 "scan.l"
  1896. ACTION_ECHO; BEGIN(ACTION);
  1897.     YY_BREAK
  1898. case 107:
  1899. YY_USER_ACTION
  1900. # line 490 "scan.l"
  1901. ACTION_ECHO;
  1902.     YY_BREAK
  1903. case YY_STATE_EOF(ACTION):
  1904. case YY_STATE_EOF(ACTION_COMMENT):
  1905. case YY_STATE_EOF(ACTION_STRING):
  1906. # line 492 "scan.l"
  1907. {
  1908.             synerr( "EOF encountered inside an action" );
  1909.             yyterminate();
  1910.             }
  1911.     YY_BREAK
  1912. case 108:
  1913. YY_USER_ACTION
  1914. # line 498 "scan.l"
  1915. {
  1916.             yylval = myesc( (Char *) yytext );
  1917.             return CHAR;
  1918.             }
  1919.     YY_BREAK
  1920. case 109:
  1921. YY_USER_ACTION
  1922. # line 503 "scan.l"
  1923. {
  1924.             yylval = myesc( (Char *) yytext );
  1925.             BEGIN(CCL);
  1926.             return CHAR;
  1927.             }
  1928.     YY_BREAK
  1929. case 110:
  1930. YY_USER_ACTION
  1931. # line 510 "scan.l"
  1932. ECHO;
  1933.     YY_BREAK
  1934. case YY_STATE_EOF(SECT3):
  1935. # line 511 "scan.l"
  1936. sectnum = 0; yyterminate();
  1937.     YY_BREAK
  1938. case 111:
  1939. YY_USER_ACTION
  1940. # line 513 "scan.l"
  1941. format_synerr( "bad character: %s", yytext );
  1942.     YY_BREAK
  1943. case 112:
  1944. YY_USER_ACTION
  1945. # line 515 "scan.l"
  1946. YY_FATAL_ERROR( "flex scanner jammed" );
  1947.     YY_BREAK
  1948. case YY_STATE_EOF(INITIAL):
  1949. case YY_STATE_EOF(SECT2):
  1950. case YY_STATE_EOF(CODEBLOCK):
  1951. case YY_STATE_EOF(PICKUPDEF):
  1952. case YY_STATE_EOF(SC):
  1953. case YY_STATE_EOF(CARETISBOL):
  1954. case YY_STATE_EOF(NUM):
  1955. case YY_STATE_EOF(QUOTE):
  1956. case YY_STATE_EOF(FIRSTCCL):
  1957. case YY_STATE_EOF(CCL):
  1958. case YY_STATE_EOF(RECOVER):
  1959. case YY_STATE_EOF(BRACEERROR):
  1960. case YY_STATE_EOF(C_COMMENT):
  1961. case YY_STATE_EOF(PERCENT_BRACE_ACTION):
  1962. case YY_STATE_EOF(USED_LIST):
  1963. case YY_STATE_EOF(CODEBLOCK_2):
  1964.     yyterminate();
  1965.  
  1966.     case YY_END_OF_BUFFER:
  1967.         {
  1968.         /* Amount of text matched not including the EOB char. */
  1969.         int yy_amount_of_matched_text = yy_cp - yytext_ptr - 1;
  1970.  
  1971.         /* Undo the effects of YY_DO_BEFORE_ACTION. */
  1972.         *yy_cp = yy_hold_char;
  1973.  
  1974.         if ( yy_current_buffer->yy_input_file != yyin )
  1975.             {
  1976.             /* This can happen if we scan a file, yywrap() returns
  1977.              * 1, and then later the user points yyin at a new
  1978.              * file to resume scanning.  We have to assure
  1979.              * consistency between yy_current_buffer and our
  1980.              * globals.  Here is the right place to do so, because
  1981.              * this is the first action (other than possibly a
  1982.              * back-up) that will match for the new input file.
  1983.              */
  1984.             yy_current_buffer->yy_input_file = yyin;
  1985.             yy_n_chars = yy_current_buffer->yy_n_chars;
  1986.             }
  1987.  
  1988.         /* Note that here we test for yy_c_buf_p "<=" to the position
  1989.          * of the first EOB in the buffer, since yy_c_buf_p will
  1990.          * already have been incremented past the NUL character
  1991.          * (since all states make transitions on EOB to the
  1992.          * end-of-buffer state).  Contrast this with the test
  1993.          * in input().
  1994.          */
  1995.         if ( yy_c_buf_p <= &yy_current_buffer->yy_ch_buf[yy_n_chars] )
  1996.             { /* This was really a NUL. */
  1997.             yy_state_type yy_next_state;
  1998.  
  1999.             yy_c_buf_p = yytext_ptr + yy_amount_of_matched_text;
  2000.  
  2001.             yy_current_state = yy_get_previous_state();
  2002.  
  2003.             /* Okay, we're now positioned to make the NUL
  2004.              * transition.  We couldn't have
  2005.              * yy_get_previous_state() go ahead and do it
  2006.              * for us because it doesn't know how to deal
  2007.              * with the possibility of jamming (and we don't
  2008.              * want to build jamming into it because then it
  2009.              * will run more slowly).
  2010.              */
  2011.  
  2012.             yy_next_state = yy_try_NUL_trans( yy_current_state );
  2013.  
  2014.             yy_bp = yytext_ptr + YY_MORE_ADJ;
  2015.  
  2016.             if ( yy_next_state )
  2017.                 {
  2018.                 /* Consume the NUL. */
  2019.                 yy_cp = ++yy_c_buf_p;
  2020.                 yy_current_state = yy_next_state;
  2021.                 goto yy_match;
  2022.                 }
  2023.  
  2024.             else
  2025.                 {
  2026.                 goto yy_find_action;
  2027.                 }
  2028.             }
  2029.  
  2030.         else switch ( yy_get_next_buffer() )
  2031.             {
  2032.             case EOB_ACT_END_OF_FILE:
  2033.                 {
  2034.                 yy_did_buffer_switch_on_eof = 0;
  2035.  
  2036.                 if ( yywrap() )
  2037.                     {
  2038.                     /* Note: because we've taken care in
  2039.                      * yy_get_next_buffer() to have set up
  2040.                      * yytext, we can now set up
  2041.                      * yy_c_buf_p so that if some total
  2042.                      * hoser (like flex itself) wants to
  2043.                      * call the scanner after we return the
  2044.                      * YY_NULL, it'll still work - another
  2045.                      * YY_NULL will get returned.
  2046.                      */
  2047.                     yy_c_buf_p = yytext_ptr + YY_MORE_ADJ;
  2048.  
  2049.                     yy_act = YY_STATE_EOF(YY_START);
  2050.                     goto do_action;
  2051.                     }
  2052.  
  2053.                 else
  2054.                     {
  2055.                     if ( ! yy_did_buffer_switch_on_eof )
  2056.                         YY_NEW_FILE;
  2057.                     }
  2058.                 break;
  2059.                 }
  2060.  
  2061.             case EOB_ACT_CONTINUE_SCAN:
  2062.                 yy_c_buf_p =
  2063.                     yytext_ptr + yy_amount_of_matched_text;
  2064.  
  2065.                 yy_current_state = yy_get_previous_state();
  2066.  
  2067.                 yy_cp = yy_c_buf_p;
  2068.                 yy_bp = yytext_ptr + YY_MORE_ADJ;
  2069.                 goto yy_match;
  2070.  
  2071.             case EOB_ACT_LAST_MATCH:
  2072.                 yy_c_buf_p =
  2073.                 &yy_current_buffer->yy_ch_buf[yy_n_chars];
  2074.  
  2075.                 yy_current_state = yy_get_previous_state();
  2076.  
  2077.                 yy_cp = yy_c_buf_p;
  2078.                 yy_bp = yytext_ptr + YY_MORE_ADJ;
  2079.                 goto yy_find_action;
  2080.             }
  2081.         break;
  2082.         }
  2083.  
  2084.     default:
  2085.         YY_FATAL_ERROR(
  2086.             "fatal flex scanner internal error--no action found" );
  2087.     } /* end of action switch */
  2088.         } /* end of scanning one token */
  2089.     } /* end of yylex */
  2090.  
  2091.  
  2092. /* yy_get_next_buffer - try to read in a new buffer
  2093.  *
  2094.  * Returns a code representing an action:
  2095.  *    EOB_ACT_LAST_MATCH -
  2096.  *    EOB_ACT_CONTINUE_SCAN - continue scanning from current position
  2097.  *    EOB_ACT_END_OF_FILE - end of file
  2098.  */
  2099.  
  2100. static int yy_get_next_buffer()
  2101.     {
  2102.     register char *dest = yy_current_buffer->yy_ch_buf;
  2103.     register char *source = yytext_ptr - 1; /* copy prev. char, too */
  2104.     register int number_to_move, i;
  2105.     int ret_val;
  2106.  
  2107.     if ( yy_c_buf_p > &yy_current_buffer->yy_ch_buf[yy_n_chars + 1] )
  2108.         YY_FATAL_ERROR(
  2109.         "fatal flex scanner internal error--end of buffer missed" );
  2110.  
  2111.     if ( yy_current_buffer->yy_fill_buffer == 0 )
  2112.         { /* Don't try to fill the buffer, so this is an EOF. */
  2113.         if ( yy_c_buf_p - yytext_ptr - YY_MORE_ADJ == 1 )
  2114.             {
  2115.             /* We matched a singled characater, the EOB, so
  2116.              * treat this as a final EOF.
  2117.              */
  2118.             return EOB_ACT_END_OF_FILE;
  2119.             }
  2120.  
  2121.         else
  2122.             {
  2123.             /* We matched some text prior to the EOB, first
  2124.              * process it.
  2125.              */
  2126.             return EOB_ACT_LAST_MATCH;
  2127.             }
  2128.         }
  2129.  
  2130.     /* Try to read more data. */
  2131.  
  2132.     /* First move last chars to start of buffer. */
  2133.     number_to_move = yy_c_buf_p - yytext_ptr;
  2134.  
  2135.     for ( i = 0; i < number_to_move; ++i )
  2136.         *(dest++) = *(source++);
  2137.  
  2138.     if ( yy_current_buffer->yy_eof_status != EOF_NOT_SEEN )
  2139.         /* don't do the read, it's not guaranteed to return an EOF,
  2140.          * just force an EOF
  2141.          */
  2142.         yy_n_chars = 0;
  2143.  
  2144.     else
  2145.         {
  2146.         int num_to_read =
  2147.             yy_current_buffer->yy_buf_size - number_to_move - 1;
  2148.  
  2149.         while ( num_to_read <= 0 )
  2150.             { /* Not enough room in the buffer - grow it. */
  2151. #ifdef YY_USES_REJECT
  2152.             YY_FATAL_ERROR(
  2153. "input buffer overflow, can't enlarge buffer because scanner uses REJECT" );
  2154. #else
  2155.  
  2156.             /* just a shorter name for the current buffer */
  2157.             YY_BUFFER_STATE b = yy_current_buffer;
  2158.  
  2159.             int yy_c_buf_p_offset = yy_c_buf_p - b->yy_ch_buf;
  2160.  
  2161.             b->yy_buf_size *= 2;
  2162.             b->yy_ch_buf = (char *)
  2163.                 yy_flex_realloc( (void *) b->yy_ch_buf,
  2164.                          b->yy_buf_size );
  2165.  
  2166.             if ( ! b->yy_ch_buf )
  2167.                 YY_FATAL_ERROR(
  2168.                 "fatal error - scanner input buffer overflow" );
  2169.  
  2170.             yy_c_buf_p = &b->yy_ch_buf[yy_c_buf_p_offset];
  2171.  
  2172.             num_to_read = yy_current_buffer->yy_buf_size -
  2173.                         number_to_move - 1;
  2174. #endif
  2175.             }
  2176.  
  2177.         if ( num_to_read > YY_READ_BUF_SIZE )
  2178.             num_to_read = YY_READ_BUF_SIZE;
  2179.  
  2180.         /* Read in more data. */
  2181.         YY_INPUT( (&yy_current_buffer->yy_ch_buf[number_to_move]),
  2182.             yy_n_chars, num_to_read );
  2183.         }
  2184.  
  2185.     if ( yy_n_chars == 0 )
  2186.         {
  2187.         if ( number_to_move - YY_MORE_ADJ == 1 )
  2188.             {
  2189.             ret_val = EOB_ACT_END_OF_FILE;
  2190.             yyrestart( yyin );
  2191.             }
  2192.  
  2193.         else
  2194.             {
  2195.             ret_val = EOB_ACT_LAST_MATCH;
  2196.             yy_current_buffer->yy_eof_status = EOF_PENDING;
  2197.             }
  2198.         }
  2199.  
  2200.     else
  2201.         ret_val = EOB_ACT_CONTINUE_SCAN;
  2202.  
  2203.     yy_n_chars += number_to_move;
  2204.     yy_current_buffer->yy_ch_buf[yy_n_chars] = YY_END_OF_BUFFER_CHAR;
  2205.     yy_current_buffer->yy_ch_buf[yy_n_chars + 1] = YY_END_OF_BUFFER_CHAR;
  2206.  
  2207.     /* yytext begins at the second character in yy_ch_buf; the first
  2208.      * character is the one which preceded it before reading in the latest
  2209.      * buffer; it needs to be kept around in case it's a newline, so
  2210.      * yy_get_previous_state() will have with '^' rules active.
  2211.      */
  2212.  
  2213.     yytext_ptr = &yy_current_buffer->yy_ch_buf[1];
  2214.  
  2215.     return ret_val;
  2216.     }
  2217.  
  2218.  
  2219. /* yy_get_previous_state - get the state just before the EOB char was reached */
  2220.  
  2221. static yy_state_type yy_get_previous_state()
  2222.     {
  2223.     register yy_state_type yy_current_state;
  2224.     register char *yy_cp;
  2225.  
  2226.     register char *yy_bp = yytext_ptr;
  2227.  
  2228.     yy_current_state = yy_start;
  2229.     if ( yy_bp[-1] == '\n' )
  2230.         ++yy_current_state;
  2231.  
  2232.     for ( yy_cp = yytext_ptr + YY_MORE_ADJ; yy_cp < yy_c_buf_p; ++yy_cp )
  2233.         {
  2234.         register YY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1);
  2235.         if ( yy_accept[yy_current_state] )
  2236.             {
  2237.             yy_last_accepting_state = yy_current_state;
  2238.             yy_last_accepting_cpos = yy_cp;
  2239.             }
  2240.         while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
  2241.             {
  2242.             yy_current_state = (int) yy_def[yy_current_state];
  2243.             if ( yy_current_state >= 408 )
  2244.                 yy_c = yy_meta[(unsigned int) yy_c];
  2245.             }
  2246.         yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
  2247.         }
  2248.  
  2249.     return yy_current_state;
  2250.     }
  2251.  
  2252.  
  2253. /* yy_try_NUL_trans - try to make a transition on the NUL character
  2254.  *
  2255.  * synopsis
  2256.  *    next_state = yy_try_NUL_trans( current_state );
  2257.  */
  2258.  
  2259. #ifdef YY_USE_PROTOS
  2260. static yy_state_type yy_try_NUL_trans( yy_state_type yy_current_state )
  2261. #else
  2262. static yy_state_type yy_try_NUL_trans( yy_current_state )
  2263. yy_state_type yy_current_state;
  2264. #endif
  2265.     {
  2266.     register int yy_is_jam;
  2267.     register char *yy_cp = yy_c_buf_p;
  2268.  
  2269.     register YY_CHAR yy_c = 1;
  2270.     if ( yy_accept[yy_current_state] )
  2271.         {
  2272.         yy_last_accepting_state = yy_current_state;
  2273.         yy_last_accepting_cpos = yy_cp;
  2274.         }
  2275.     while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
  2276.         {
  2277.         yy_current_state = (int) yy_def[yy_current_state];
  2278.         if ( yy_current_state >= 408 )
  2279.             yy_c = yy_meta[(unsigned int) yy_c];
  2280.         }
  2281.     yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
  2282.     yy_is_jam = (yy_current_state == 407);
  2283.  
  2284.     return yy_is_jam ? 0 : yy_current_state;
  2285.     }
  2286.  
  2287.  
  2288. #ifdef YY_USE_PROTOS
  2289. static void yyunput( int c, register char *yy_bp )
  2290. #else
  2291. static void yyunput( c, yy_bp )
  2292. int c;
  2293. register char *yy_bp;
  2294. #endif
  2295.     {
  2296.     register char *yy_cp = yy_c_buf_p;
  2297.  
  2298.     /* undo effects of setting up yytext */
  2299.     *yy_cp = yy_hold_char;
  2300.  
  2301.     if ( yy_cp < yy_current_buffer->yy_ch_buf + 2 )
  2302.         { /* need to shift things up to make room */
  2303.         /* +2 for EOB chars. */
  2304.         register int number_to_move = yy_n_chars + 2;
  2305.         register char *dest = &yy_current_buffer->yy_ch_buf[
  2306.                     yy_current_buffer->yy_buf_size + 2];
  2307.         register char *source =
  2308.                 &yy_current_buffer->yy_ch_buf[number_to_move];
  2309.  
  2310.         while ( source > yy_current_buffer->yy_ch_buf )
  2311.             *--dest = *--source;
  2312.  
  2313.         yy_cp += dest - source;
  2314.         yy_bp += dest - source;
  2315.         yy_n_chars = yy_current_buffer->yy_buf_size;
  2316.  
  2317.         if ( yy_cp < yy_current_buffer->yy_ch_buf + 2 )
  2318.             YY_FATAL_ERROR( "flex scanner push-back overflow" );
  2319.         }
  2320.  
  2321.     if ( yy_cp > yy_bp && yy_cp[-1] == '\n' )
  2322.         yy_cp[-2] = '\n';
  2323.  
  2324.     *--yy_cp = (char) c;
  2325.  
  2326.  
  2327.     /* Note: the formal parameter *must* be called "yy_bp" for this
  2328.      * macro to now work correctly.
  2329.      */
  2330.     YY_DO_BEFORE_ACTION; /* set up yytext again */
  2331.     }
  2332.  
  2333.  
  2334. #ifdef __cplusplus
  2335. static int yyinput()
  2336. #else
  2337. static int input()
  2338. #endif
  2339.     {
  2340.     int c;
  2341.  
  2342.     *yy_c_buf_p = yy_hold_char;
  2343.  
  2344.     if ( *yy_c_buf_p == YY_END_OF_BUFFER_CHAR )
  2345.         {
  2346.         /* yy_c_buf_p now points to the character we want to return.
  2347.          * If this occurs *before* the EOB characters, then it's a
  2348.          * valid NUL; if not, then we've hit the end of the buffer.
  2349.          */
  2350.         if ( yy_c_buf_p < &yy_current_buffer->yy_ch_buf[yy_n_chars] )
  2351.             /* This was really a NUL. */
  2352.             *yy_c_buf_p = '\0';
  2353.  
  2354.         else
  2355.             { /* need more input */
  2356.             yytext_ptr = yy_c_buf_p;
  2357.             ++yy_c_buf_p;
  2358.  
  2359.             switch ( yy_get_next_buffer() )
  2360.                 {
  2361.                 case EOB_ACT_END_OF_FILE:
  2362.                     {
  2363.                     if ( yywrap() )
  2364.                         {
  2365.                         yy_c_buf_p =
  2366.                         yytext_ptr + YY_MORE_ADJ;
  2367.                         return EOF;
  2368.                         }
  2369.  
  2370.                     YY_NEW_FILE;
  2371. #ifdef __cplusplus
  2372.                     return yyinput();
  2373. #else
  2374.                     return input();
  2375. #endif
  2376.                     }
  2377.  
  2378.                 case EOB_ACT_CONTINUE_SCAN:
  2379.                     yy_c_buf_p = yytext_ptr + YY_MORE_ADJ;
  2380.                     break;
  2381.  
  2382.                 case EOB_ACT_LAST_MATCH:
  2383. #ifdef __cplusplus
  2384.                     YY_FATAL_ERROR(
  2385.                     "unexpected last match in yyinput()" );
  2386. #else
  2387.                     YY_FATAL_ERROR(
  2388.                     "unexpected last match in input()" );
  2389. #endif
  2390.                 }
  2391.             }
  2392.         }
  2393.  
  2394.     c = *yy_c_buf_p;
  2395.     *yy_c_buf_p = '\0';    /* preserve yytext */
  2396.     yy_hold_char = *++yy_c_buf_p;
  2397.  
  2398.     return c;
  2399.     }
  2400.  
  2401.  
  2402. #ifdef YY_USE_PROTOS
  2403. void yyrestart( FILE *input_file )
  2404. #else
  2405. void yyrestart( input_file )
  2406. FILE *input_file;
  2407. #endif
  2408.     {
  2409.     if ( ! yy_current_buffer )
  2410.         yy_current_buffer = yy_create_buffer( yyin, YY_BUF_SIZE );
  2411.  
  2412.     yy_init_buffer( yy_current_buffer, input_file );
  2413.     yy_load_buffer_state();
  2414.     }
  2415.  
  2416.  
  2417. #ifdef YY_USE_PROTOS
  2418. void yy_switch_to_buffer( YY_BUFFER_STATE new_buffer )
  2419. #else
  2420. void yy_switch_to_buffer( new_buffer )
  2421. YY_BUFFER_STATE new_buffer;
  2422. #endif
  2423.     {
  2424.     if ( yy_current_buffer == new_buffer )
  2425.         return;
  2426.  
  2427.     if ( yy_current_buffer )
  2428.         {
  2429.         /* Flush out information for old buffer. */
  2430.         *yy_c_buf_p = yy_hold_char;
  2431.         yy_current_buffer->yy_buf_pos = yy_c_buf_p;
  2432.         yy_current_buffer->yy_n_chars = yy_n_chars;
  2433.         }
  2434.  
  2435.     yy_current_buffer = new_buffer;
  2436.     yy_load_buffer_state();
  2437.  
  2438.     /* We don't actually know whether we did this switch during
  2439.      * EOF (yywrap()) processing, but the only time this flag
  2440.      * is looked at is after yywrap() is called, so it's safe
  2441.      * to go ahead and always set it.
  2442.      */
  2443.     yy_did_buffer_switch_on_eof = 1;
  2444.     }
  2445.  
  2446.  
  2447. #ifdef YY_USE_PROTOS
  2448. void yy_load_buffer_state( void )
  2449. #else
  2450. void yy_load_buffer_state()
  2451. #endif
  2452.     {
  2453.     yy_n_chars = yy_current_buffer->yy_n_chars;
  2454.     yytext_ptr = yy_c_buf_p = yy_current_buffer->yy_buf_pos;
  2455.     yyin = yy_current_buffer->yy_input_file;
  2456.     yy_hold_char = *yy_c_buf_p;
  2457.     }
  2458.  
  2459.  
  2460. #ifdef YY_USE_PROTOS
  2461. YY_BUFFER_STATE yy_create_buffer( FILE *file, int size )
  2462. #else
  2463. YY_BUFFER_STATE yy_create_buffer( file, size )
  2464. FILE *file;
  2465. int size;
  2466. #endif
  2467.     {
  2468.     YY_BUFFER_STATE b;
  2469.  
  2470.     b = (YY_BUFFER_STATE) yy_flex_alloc( sizeof( struct yy_buffer_state ) );
  2471.  
  2472.     if ( ! b )
  2473.         YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );
  2474.  
  2475.     b->yy_buf_size = size;
  2476.  
  2477.     /* yy_ch_buf has to be 2 characters longer than the size given because
  2478.      * we need to put in 2 end-of-buffer characters.
  2479.      */
  2480.     b->yy_ch_buf = (char *) yy_flex_alloc( b->yy_buf_size + 2 );
  2481.  
  2482.     if ( ! b->yy_ch_buf )
  2483.         YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );
  2484.  
  2485.     yy_init_buffer( b, file );
  2486.  
  2487.     return b;
  2488.     }
  2489.  
  2490.  
  2491. #ifdef YY_USE_PROTOS
  2492. void yy_delete_buffer( YY_BUFFER_STATE b )
  2493. #else
  2494. void yy_delete_buffer( b )
  2495. YY_BUFFER_STATE b;
  2496. #endif
  2497.     {
  2498.     if ( b == yy_current_buffer )
  2499.         yy_current_buffer = (YY_BUFFER_STATE) 0;
  2500.  
  2501.     yy_flex_free( (void *) b->yy_ch_buf );
  2502.     yy_flex_free( (void *) b );
  2503.     }
  2504.  
  2505.  
  2506. #ifdef YY_USE_PROTOS
  2507. void yy_init_buffer( YY_BUFFER_STATE b, FILE *file )
  2508. #else
  2509. void yy_init_buffer( b, file )
  2510. YY_BUFFER_STATE b;
  2511. FILE *file;
  2512. #endif
  2513.     {
  2514.     b->yy_input_file = file;
  2515.  
  2516.     /* We put in the '\n' and start reading from [1] so that an
  2517.      * initial match-at-newline will be true.
  2518.      */
  2519.  
  2520.     b->yy_ch_buf[0] = '\n';
  2521.     b->yy_n_chars = 1;
  2522.  
  2523.     /* We always need two end-of-buffer characters.  The first causes
  2524.      * a transition to the end-of-buffer state.  The second causes
  2525.      * a jam in that state.
  2526.      */
  2527.     b->yy_ch_buf[1] = YY_END_OF_BUFFER_CHAR;
  2528.     b->yy_ch_buf[2] = YY_END_OF_BUFFER_CHAR;
  2529.  
  2530.     b->yy_buf_pos = &b->yy_ch_buf[1];
  2531.  
  2532.     b->yy_is_interactive = file ? isatty( fileno(file) ) : 0;
  2533.  
  2534.     b->yy_fill_buffer = 1;
  2535.  
  2536.     b->yy_eof_status = EOF_NOT_SEEN;
  2537.     }
  2538.  
  2539.  
  2540. #ifdef YY_USE_PROTOS
  2541. static void yy_push_state( int new_state )
  2542. #else
  2543. static void yy_push_state( new_state )
  2544. int new_state;
  2545. #endif
  2546.     {
  2547.     if ( yy_start_stack_ptr >= yy_start_stack_depth )
  2548.         {
  2549.         int new_size;
  2550.  
  2551.         yy_start_stack_depth += YY_START_STACK_INCR;
  2552.         new_size = yy_start_stack_depth * sizeof( int );
  2553.  
  2554.         if ( ! yy_start_stack )
  2555.             yy_start_stack = (int *) yy_flex_alloc( new_size );
  2556.  
  2557.         else
  2558.             yy_start_stack = (int *) yy_flex_realloc(
  2559.                     (void *) yy_start_stack, new_size );
  2560.  
  2561.         if ( ! yy_start_stack )
  2562.             YY_FATAL_ERROR(
  2563.             "out of memory expanding start-condition stack" );
  2564.         }
  2565.  
  2566.     yy_start_stack[yy_start_stack_ptr++] = YY_START;
  2567.  
  2568.     BEGIN(new_state);
  2569.     }
  2570.  
  2571.  
  2572. static void yy_pop_state()
  2573.     {
  2574.     if ( --yy_start_stack_ptr < 0 )
  2575.         YY_FATAL_ERROR( "start-condition stack underflow" );
  2576.  
  2577.     BEGIN(yy_start_stack[yy_start_stack_ptr]);
  2578.     }
  2579.  
  2580.  
  2581. static int yy_top_state()
  2582.     {
  2583.     return yy_start_stack[yy_start_stack_ptr - 1];
  2584.     }
  2585.  
  2586.  
  2587. #ifdef YY_USE_PROTOS
  2588. static void yy_fatal_error( const char msg[] )
  2589. #else
  2590. static void yy_fatal_error( msg )
  2591. char msg[];
  2592. #endif
  2593.     {
  2594.     (void) fprintf( stderr, "%s\n", msg );
  2595.     exit( 1 );
  2596.     }
  2597.  
  2598.  
  2599.  
  2600. /* Redefine yyless() so it works in section 3 code. */
  2601.  
  2602. #undef yyless
  2603. #define yyless(n) \
  2604.     do \
  2605.         { \
  2606.         /* Undo effects of setting up yytext. */ \
  2607.         yytext[yyleng] = yy_hold_char; \
  2608.         yy_c_buf_p = yytext + n - YY_MORE_ADJ; \
  2609.         yy_hold_char = *yy_c_buf_p; \
  2610.         *yy_c_buf_p = '\0'; \
  2611.         yyleng = n; \
  2612.         } \
  2613.     while ( 0 )
  2614.  
  2615.  
  2616. /* Internal utility routines. */
  2617.  
  2618. #ifndef yytext_ptr
  2619. #ifdef YY_USE_PROTOS
  2620. static void yy_flex_strcpy( char *s1, const char *s2 )
  2621. #else
  2622. static void yy_flex_strcpy( s1, s2 )
  2623. char *s1;
  2624. const char *s2;
  2625. #endif
  2626.     {
  2627.     while ( (*(s1++) = *(s2++)) )
  2628.         ;
  2629.     }
  2630. #endif
  2631.  
  2632.  
  2633. #ifdef YY_USE_PROTOS
  2634. static void *yy_flex_alloc( unsigned int size )
  2635. #else
  2636. static void *yy_flex_alloc( size )
  2637. unsigned int size;
  2638. #endif
  2639.     {
  2640.     return (void *) malloc( size );
  2641.     }
  2642.  
  2643. #ifdef YY_USE_PROTOS
  2644. static void *yy_flex_realloc( void *ptr, unsigned int size )
  2645. #else
  2646. static void *yy_flex_realloc( ptr, size )
  2647. void *ptr;
  2648. unsigned int size;
  2649. #endif
  2650.     {
  2651.     return (void *) realloc( ptr, size );
  2652.     }
  2653.  
  2654. #ifdef YY_USE_PROTOS
  2655. static void yy_flex_free( void *ptr )
  2656. #else
  2657. static void yy_flex_free( ptr )
  2658. void *ptr;
  2659. #endif
  2660.     {
  2661.     free( ptr );
  2662.     }
  2663. # line 515 "scan.l"
  2664.  
  2665.  
  2666.  
  2667. int yywrap()
  2668.     {
  2669.     if ( --num_input_files > 0 )
  2670.         {
  2671.         set_input_file( *++input_files );
  2672.         return 0;
  2673.         }
  2674.  
  2675.     else
  2676.         return 1;
  2677.     }
  2678.  
  2679.  
  2680. /* set_input_file - open the given file (if NULL, stdin) for scanning */
  2681.  
  2682. void set_input_file( file )
  2683. char *file;
  2684.     {
  2685.     if ( file )
  2686.         {
  2687.         infilename = file;
  2688.         yyin = fopen( infilename, "r" );
  2689.  
  2690.         if ( yyin == NULL )
  2691.             lerrsf( "can't open %s", file );
  2692.         }
  2693.  
  2694.     else
  2695.         {
  2696.         yyin = stdin;
  2697.         infilename = "<stdin>";
  2698.         }
  2699.     }
  2700.  
  2701.  
  2702. /* Wrapper routines for accessing the scanner's malloc routines. */
  2703.  
  2704. void *flex_alloc( size )
  2705. unsigned int size;
  2706.     {
  2707.     return yy_flex_alloc( size );
  2708.     }
  2709.  
  2710. void *flex_realloc( ptr, size )
  2711. void *ptr;
  2712. unsigned int size;
  2713.     {
  2714.     return yy_flex_realloc( ptr, size );
  2715.     }
  2716.  
  2717. void flex_free( ptr )
  2718. void *ptr;
  2719.     {
  2720.     yy_flex_free( ptr );
  2721.     }
  2722.